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le monde de Pinf ormatimie 

si par hasard, vous aviez une meilleure offre, 



DEPARTEMENT SOFTWARE 



INTERNATIONAL 
COMPUTER 




PERSONAL SOFTWARE 

Cette societe, intallee en pleine "Silicon Valley", a Sunny- 
vale en Californie, est celle qui a "invente" I'un des best-sellers 
de programmes de microinformatique : le Visicalc. 

Nous sommes tiers de vous presenter ici leurs nouveaux 
produits. Tous ces programmes necessitent au moins un 
APPLE 48 K et une unite de floppy. Ms sont fournis avec une 
abondante documentation, helas pour I'instanten langueame- 
ricaine. 

Contactez nous pour les versions disponibles pour CBM. 



VISICALC 



1690 F TTC 



(nouvelle version) 

L'un des programmes pour ordinateur personnel parmi les plus repandus au monde. 

Parce que VISICALC est aussi simple a utiliser pour manipulerdes donnees chiffrees sous forme d'un tableau 
qu'une simple feuille de papier avec un crayon. 

Pour creer un tableau, il suff it juste de taper le texte, les chiffres ainsi que les formules a I'endroit que vous desirez 
sur lecran. 

En posant la quastion "et si...", VISICALC vous donnera des reponses immediates. Changez un seul chiffre. 
immediatement, toutes les autres valeurs concernees seront changees et les resultats affiches sur lecran ou sur 
votre imprimante. 

Ainsi, vous pourrez visualiser instantanement le resultat de vos decisions, avant meme dv les prendre. 

Lecran de VISICALC est une fenetre dans un enorme plan de travail, de 63 colonnes. sur 254 lignes. C'est une 
enorme feuille de papier electronique, qui peut effectuer un grand nombredecalculs, y compris lesfonctionstrans- 
cendentales, les "if then" ou les operateurs boleens. Sur lecran de votre ordinateur. vous pourrez voir VISICALC 
effectuer ses calculs et afficher en quelques secondes des resultats si complexes, que, sans lui, vous aunez mis des 
heures a obtenir. 

VISICALC est aussi a aise a utiliser qu'une calculatrice de poche. Son editeur d'ecran vous permet de deplacer 
vos chiffres et vos formules quasi-instantanement. Avec quelques touches de votre clavier, vous pourrez dupliquer. . 
pour des calculs repetitifs, des formules par lignes ou par colonnes. Vous pourrez meme observer deux portions diffe- 
rentes de votre "feuille electronique" simultanement sur I'ecran, en partageant votre ecran en deux, horizontalement 
ou verticalement. Observez.vos donnees en debut et en fin d'annee, vous pourrez ainsi voir la dependance d une 
variable sur une ou plusieurs autres. 

Et ensuite. vous pourrez en faire un etat imprime. VISICALC peut aussi echanger ses donnees avec d'autres pro- 
grammes de Personal Software. Prenez les comptes de vos clients de votre CCA / DMS, af in de projeter dans I'avenir 
votre chiffre d'affaires. Introduisez ces chiffres dans VISIPLOT pour produire des graphiques ou des histogrammes. 



DESKTOP PLAN II 

C'est un programme qui vous permet aisement d'automatiser et d'organiser toutes vos analyses de budget, ainsi 
que vos plannings budgetaires. 

II vous guide pas a pas, depuis le plan originel de votre budget ou previsions, jusqu au resultat final, le rapport, 
d'une presentation impeccable. 

II peut egalement generer ses propres graphiques pour une meilleure interpretation. 

DESKTOP PLAN peut saisir les modeles financiers les plus complexes, ce qui le rend particulierement utile pour 
consolider des budgets decentralises et les combiner dans des modeles identiques pour les projeter dans un budget 
global. 

Si vous n'avez jamais fait de modelisation finaciere, ce programme vous introduira a une methode plus facile et 
plus efficace de planning financier ou de budgetisation que les laborieuses methodes du passe. 

1690 F TTC 

Ancienne version : 880 F TTC 



VISIPLOT 



Un programme qui ajoute une dimension visuelle nouvelle a toutes vos analyses chiffrees, que ce soit de la 
finance, de la prevision ou de la planification. 

VISIPLOT transforme les rangees et colonnes de chiffres, meme les plus ardues a interpreter, en des graphiques 
ou histogrammes faciles a comprendre et cela devant vos yeux. 

Vous obtenez ainsi une qualite de' presentation de vos graphiques, qui ameliorera votre information, et facilitera 
la comprehension. 

Vous n'avez besoin d'aucune connaissance en programmation pour mettre en ceuvre VISIPLOT. Un "menu' 
vous donne a choisir les options desirees, et vous n'avez plus qua entrer vos donnees. Votre APPLE fera tous les cal- 
culs necessaires, et affichera votre graphique. Vous pourrez ensuite le sauver sur disque pour une utilisation ulte- 
rieure, ou I'imprimer sur papier. 



Avec VISIPLOT, vous pourrez tracer plusieurs courbes a. la fois, avec differentes series d'informations, ombrer 
plus ou moins les differents graphes, ou les colorier pour faciliter les comparaisons, par exemple des annees ou des 
moisdifferents.Vous pourrez meme surimpressionner plusieurs graphiques, par exemple vos stocks, et lacourbede 
vosventes. 

Ce programme permet de visualiser tous types de graphiques ou d'histogrammes, meme circulaires. 
I! genere automatiquement les dimensions x et y, peut insererdes legendes, etc... 

Bien entendu, il peut saisir aussi ses donnees depuis de programmes comme VISICALC, multipliant ainsi ses 
possibilites. 
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VISITREND / VISIPLOT 

Si vous avez besoin d analyses statistiques ou de previsions, et que vous soyez decourages par la difficulty de 
les obtenir, alors, il vous faut VISITREND- VISIPLOT. 

Ce programme repond aux besoins des chefs d'entreprise. des planificateurs. des investisseurs. analystes ou 
consultants. Vous pouvez obtenir des regressions lineaires pour connaitre les rapports entre les variables, ou bien 
encore les moyennes variables, ou les lissages exponentiels. etc... 

Ou encore, ecrire des formules arbitraires pour calculer de nouvelles series, basees sur celles existantes. 

Avec une simple commande. vous pouvez obtenir des statistiques descriptives sur n'importe quelles series de 
donnees, par exemple leur variance, leur deviation standard, leur min ou leur max. Et avec la puissance graphique de 
ce programme, vous pourrez produire facilement graphiques ou histogrammes. ce qui pourra facilement vous per- 
mettre de comparer une serie a une autre. 

Ce programme a evidemment les memes possibilites graphiques que VISIPLOT. Comme tous les programmes 
de Personal Software, vous n'avez pas besoin de savoir programmer pour les mettre en ceuvre. et ils sont compati- 
bles avec VISICALC. 
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VISIDEX 



Comment se souvenir de tout 9 Ce programme est la pour cela VISIDEX n impose aucune restriction en ce qui 
concerne vos donnees : noms. adresses. dates importarjtes. rendez-vous. idees. notes, etc... et priorites. impots a 
payer (helas). stocks et autres informations imporantes. 

Et vous pouvez retrouver exactement ce que vous voulez. car VISIDEX "pense" pour vo.us. vous donnant les 
moyens de retrouver n'importe quoi. plus vite 

C est comme un fichier vide, vous tapez ce que vous voulez dans une fiche. et vous donnez a votre Apple les 
"cles' pour retrouver cette fiche . noms. phrases, chiffres. ou bien dates Car vous decidez du classement de vos 
"fiches" et VISIDEX se souviendra pour vous de votre classement 

Vous donnez juste a votre ordinateur. une date- ou un nom de client et VISIDEX vous visualise la "fiche'' conte- 
nant ce nom ou cette information (par exemple. si vous introduisez le nom d un client, vous aurez votre dernier ren- 
dez-vous. son planning d'organisation. ses hobbies, sa date d'anniversaire et les idees que vous pouvez lui propo- 
ser !) 

VISIDEX permet aussi d imprimer vos informations par ordre alphabetique. numerique. ou encore par dates. II 
permet de tenir votre agenda, et de vous alerter sur les dates, heures ou occasions importantes. Grace a sa capacite 
de ne pas structurer par lui-meme I nformation, ce programme vous permet de faire vous-meme votre classement 
Ainsi. votre secretaire pourra introduire elle-meme des donnees. et elles viendront se classer dans le bon ordre 

Si vous craignez d'oubher quelque chose d important. VISIDEX est fait pour vous !!! 
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CCA/DATA MANAGEMENT 
SYSTEM (CCA /DMS) 

Mailings, fichiers clients, stocks comptes fournisseurs et etiquettes adresses. tout ce type d informations saisi 
au jour-le-jour. CCA/ DMS peut mieux le traiter 

Des tas de fiches sont remplacees par quelques disquettes 1 Avec CCA DMS. vous pouvez definir les informa- 
tions que vous desirez saisir. la maniere de les saisir ainsi que la maniere de les presenter 

Chaque enregistrement peut avoir jusqu'a 24 champs. Cest-a-dire que si vous ntroduisez le Nom. Adresse 
Profesaon. Ville. Code Postal, il vous res te encore 1 8 informations differentes a saisir. Chaque fiche peut avoir 232 
caracteres de long. Vous pouvez trier vos fiches en alphabetique ou en numerique. en ascendant ou en descendant 
et jusqu'a dix criteres a la fois 1 Trier vos clients par chiffre d affaire ou par nom. trier des adresses par code postal ou 
par ville ! 

Et CCA permet aussi de faire des operation's mathematiques simples, comme de multiplier des heures par un 
taux dans une meme fiche. En mode d'impression. CCA peut imprimer des sous-totaux. Compatible avec VISICALC 
VISIPLOT. etc... CCA/DMS est vraiment l'un des meilleurs programmes de fichiers. en sequentiel indexe. fait pour 
un microordinateur personnel. 
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SHARP MZ 80 
Programmes en Francais 

ECHECS 195 F TTC 

Necessite 20 K. Ce programme est recommande aux debutants, vu la rapidite 
des reponses. 

SUPER ECHECS 250 F TTC 

Nouveau programme. Detronera bien vite le precedent, a condition de disposer 
de 48 K. Utilise la notation Internationale. 

BLACKJACK 1 50 F TTC 

C'est le jeu de carte bien connu, appelle aussi 21 . Utilise le graphisme. De 1 a 8 
joueurs. 48 Ket Basic. 

MUR DE BRIQUES 1 50 F TTC 

Objectif : demolir un mur de brique. 1 a 9 joueurs sur 6 niveaux de difficulte. 32 K 
et Basic. 

MORPIONII 1 50 F TTC 

Ce programme, mi Basic, mi assembleur, joue selon les regies traditionnelles. 
Le premier qui aligne 5 pions gagne. MZ 80 donne sa reponse en 0,2". Essayez 
de le battre. Depuis 20 K. 

GUERRE DES ETOILES 195 F TTC 

Jeu derive des fameux Startrecks. Vous vous trouvez dans la galaxie, dans une 
aiure de 8x8 quadrants. Votre mission est de detruire vos ennemis grace a I'or- 
dinateur de bord. 48 K et Basic. 



DEPARTEMENT LOCATION 

ET MATERIEL DEPOSITION 

La location est le meilleur moyen de choisir en connaissance de cause votre 
materiel. Un microordinateur est un achat couteux. 
Posez vous les questions suivantes : 

Aurai-je I'usaqe d'un microordinateur ? Celui que ie choisis est-il le meilleur pour 
mes besoins ? baurai-je m'en servir convenablement ? Etc... 

Sans risque financier, grace a la location, vous pourrez vous faire une opinion. 

De plus, le montant de la location est entierement deductible en cas d'achat 



APPLE II 16 K 

APPLE II 48 K 

Moniteur video N/B * 

DISK II avec contrdleur 

CENTRONICS 779 avec interface 

PET 2001 

CBM 3032 

VIDEOTEAM +TV coul. modifiee 4-ecran 1,60 diagon. 



200 F TTC/jour 
250 F TTC/jour 
50 F TTC/jour 
110 F TTC/jour 
250 F TTC/jour 
180 F TTC/jour 
230 F TTC/jour 
290 F TTC/jour 



DEPARTEMENT OCCASIONS GARANTIES 

Nos occasions pouvant tres souvent se renouvcller. nous vous 
recommandons de vous renseigner au prealabie par telephone 
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Editorial 



Contrairement a l'avis de certains sages et prophetes de mauvaise augure 
rencontres au Sicob, le numero 2 de Pom's voit le jour, et la serie ne s'arretera 
pas la ! Au debut du mois de decembre, Pom's s'est deja diffuse a 1200 
exemplaires, et des lettres nous parviennent tous les jours. Dans l 1 ensemble, la 
reaction des lecteurs a ete tres sympathique et constructive. Les seules critiques 
que nous ayons regues a ce jour proviennent d T experts qui n T ont n rien appris" en 
lisant Pom's. Nous esperons qu'ils voudront bien partager leur savoir-faire en nous 
envoyant des contributions. A vos claviers ... 

Nous n'avons pas pu faire tenir toutes les contributions dans ce numero, et 
certaines nous sont parvenues trop tard pour que nous puissions les imprimer dans 
de bonnes conditions. Nous remettons done au numero 3 de Pom T s 1 T article de 
Jean-Louis Meillaud sur 1 T apprentissage de 1 T assembleur . Rassurez-vous , il existe; 
nous l'avons enfin regu. En attendant, vous pourrez demarrer votre initiation a 
l 1 assembleur avec "La pratique de 1 'Apple", tome III, sorti au Sicob. De meme, 
1 'article comparatif des cartes 80 colonnes devrait refaire surface au sommaire du 
prochain numero. Vu les difficultes que nous avons pour tout sortir dans les 
delais, nous prenons la precaution de ne pas vous soumettre le futur sommaire, 
en vous laissant la surprise ! 

Nous terminons l'annee 1981 avec 1' apparition de l 1 Apple ///; il ne s'agit pas la 
d'un premature ! Nous vous le presentons sans tarder. II y a aussi du nouveau dans 
notre disquette d ' accompagnement : elle est maintenant bootable indif feremment en 
DOS 3*2 ou DOS 3.3- Par contre, elle n'est pas copiable par le programme de copie 
du Master; e'est une consequence inevitable de la procedure utilisee cette 
fois-ci. Cela ne vous empeche pas de copier les fichiers qui vous interessent sur 
d'autres disquettes. 

Gilles Mauffrey a realise un joli programme permettant de copier le programme 
Pascal de la disquette Pom ! s numero 2 sur une disquette Pascal. II nous expliquera 
dans le numero 3 (fin mars) comment il transpose un programme Pascal sur une 
disquette normale, et vice-versa. Comme vous pouvez le voir, Pom's est a la pointe 
du progres. 



Bonne lecture - GOTO 1982 avec tous nos voeux ! 

Herve Thiriez 
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Pour mieux choisir 
"votre" ordinateur 
et pour mieux I'utiliser. 



^^x\x^ ^^^^ '*& 




? 




I'l L ORDINATEUR 
IL— ij INDIVIDUEL 

Vous y trouverez : 

L'actualite et les tendances de I'informatique individuelle • des galops et des bancs 
d'essai des principaux materiels . des panoramas et des tests comparatifs . le point 
des grandes manifestations internationales • des articles d'initiation • des syntheses 
• des programmes • des interviews "exemplaires" • des conseils • des idees 

• des astuces. 

I'l l ordinateur 

II— Jj INDIVIDUEL 

chez votre marchand de journaux 

41 rue de la Grange aux Belles - 75010 Paris 



Faites le menage dans la memoire 



GERARD MICHEL 



Si vous programmez en BASIC Applesoft des applications impliquant de nombreux 
traitements de chaines de caracteres, vous avez sans doute constate que la zone de 
stockage de ces chaines se trouve souvent trop vite saturee. En effet, si vous 
changez en cours de programme le contenu d'une chaine A$ (par exemple, A$="NOM" 
devient A$="PRENOM" ) , le nouveau contenu est stocke en memoire sans elimination 
prealable de son predecesseur . En consequence, de nombreux caracteres devenus 
inutiles viennent encombrer la memoire et en provoquent bientot la saturation. 

Ainsi que l T explique le Manuel de Reference, Applesoft dispose d T une routine 
assurant automatiquement 1 T elimination des donnees inutiles lorsque 1 'accumulation 
des chaines de caracteres menace de T deborder T sur d T autres zones de memoire 
actives. Ce nettoyage peut egalement etre impose par le programme au moyen 
d T instructions du type "X=FRE(0)"; vous decidez alors de proceder a 1 T operation a 
1 T issue d T une phase de traitement comportant de nombreuses manipulations de 
chaines . 

La routine de nettoyage est la meme dans les deux cas et repose sur le principe 
suivant : 

1. Explorer la zone de stockage, trouver la premiere chaine T active T et 
la placer juste sous HIMEM. 

2. Explorer de nouveau la zone de stockage, trouver la deuxieme chaine 
T active T et la placer juste sous la precedente ... et ainsi de suite. 

Quiconque a eu recours a cette routine a pu constater la lenteur de 1 T operation. 
Heureusement , un article paru dans le numero de Janvier 1981 de Call-A . P . P .L . E . 
ouvre des horizons nouveaux pour les T victimes T du FRE(O), et il nous parait 
indispensable d T en faire benef icier tous ceux qui n'en auraient pas eu 
connaissance . 

L T auteur y presente un programme en assembleur, destine a remplacer la routine 
Applesoft. Ce nouveau programme ne trouve pas seulement une chaine active unique a 
chaque exploration de la zone de stockage, mais en trouve un nombre N, defini par 
l'utilisateur , N devant avoir une valeur comprise entre 1 et 127. Bien sur, plus N 
est grand, plus le nettoyage s T effectue rapidement. Toutefois, le traitement des 
chaines impose de reserver une place memoire egale a 6xN octets et situee au- 
dessus de la routine elle-meme. Le choix de la valeur de N doit done resulter d T un 
arbitrage entre rapidite de traitement et T encombrement T . 

Dans la version du programme assembleur baptisee FRE(16), dont la liste est donnee 
ci-apres, N est fixe a 16, mais nous vous presentons egalement, sous 1 T appellation 
FRE(64), le code hexadecimal pour N egal a 64. En tout etat de cause, vous pourrez 
constater que le gaih de temps resultant du passage de FRE(O) a FRE(16) est dans 
la majorite des cas beaucoup plus appreciable que celui resultant du passage de 
FRE( 16) a FRE(64) . 

Par ailleurs, la routine telle qu T elle apparait ici est destinee a la meme 
utilisation que 1 T instruction "X=FRE(0)". En d T autres termes, il vous appartient 
d T effectuer un "CALL 37500" en un point du programme ou l T operation de nettoyage 
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vous parait necessaire et d 1 en forcer ainsi 1 'execution. 

Le programme publie dans Call -A.P.P.L.E. se rapproche plutot de l'hypothese ou le 
programme BASIC laisse a Applesoft 1 T initiative du nettoyage, dans la mesure ou un 
test prealable est effectue sur la place memoire encore libre entre la fin du 
stockage des chaines et le debut de la zone de stockage des pointeurs de tableaux. 
Ainsi, le nettoyage ne s T execute que si la dimension de cette place libre tombe 
en-dessous de 1K octets. 

Ce test permet done de ne proceder au nettoyage que si celui-ci devient absolument 
indispensable. Par contre, il impose de tres frequents appels a la routine. En 
effet, si- ces appels ne se repetent pas assez souvent, Applesoft risque de prendre 
l 1 initiative des operations et de mettre a nouveau votre patience a rude epreuve . 

En fait, cette version du programme se prete essentiellement a des traitements 
pour lesquels l'appel de la routine peut s'effectuer a l'interieur d'une boucle 
assez T courte T (algorithmes de tri ...). Si vous souhaitez l'utiliser dans un tel 
contexte, chargez le programme et modifiez-le en tapant en mode moniteur "927C: A5 
70 38". 



Les quelques petits programmes presentes plus bas vous permettront de comparer 
l'efficacite des differentes routines de nettoyage. 

Remarque : quand le programme fait appel a une routine assembleur, le temps de 
traitement indique comprend le temps necessaire au chargement de cette routine a 
partir de la disquette. 



1 ) Exemple numero 1 



1 HIMEM: 37490 

10 D$=CHR (4) :DIM Z$(500) 

20 FOR 1=1 TO 500:Z$(I)=STR$(I) : PRINT I : IF INT( 1/ 1 00 ) =1/ 100 THEN X=FRE(0) 
30 NEXT: END 

a) Execution du programme tel quel. 

Temps de traitement (du 'RETURN 1 apres RUN jusqu'a reapparition finale du curse ur) 
: environ 1 minute 30. 

b) Execution du programme avec FRE(16). 
Rajout d'une ligne : 15 PRINT D$"BL0AD FRE(16)" 
Remplacement de n X=FRE(0)" par "CALL 37500" 
Temps de traitement : environ 30 secondes. 

2) Exemple numero 2 



1 HIMEM: 37490 

5 BL$=" ":F0R 1=1 TO 5 : BL$=BL$+BL$ : NEXT 
10 D$=CHR$(4) :DIM Z$ ( 1 000 ) , Y$ ( 1 000 ) , T$ ( 1 000 ) 

20 FOR 1=1 TO 50:Z$=STR$(I)+BL$:Z$(I)=Z$:Y$(I)=Z$:T$(I)=Z$:PRINT I : IF INT(I/2)=I/2 
THEN X=FRE(0) 
30 NEXT: END 
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Modification 


Temps de traitement 


A Programme tel quel 


plus de 5 minutes 


B Raj out de: 15 PRINT D$"BLOAD FRE(16) 
A-rnMU; aevient "CALL 37500 


40 secondes 


C Idem mais avec FRE(64) 


30 secondes 


D Programme A mais sans n X=FRE(0) !l en ligne 20 
(nettoyage automatique d T Applesoft) 


45 secondes 


E Programme D mais avec: 15 Print D$"BL0AD 

FRE( 16) . TEST" et ajout de "CALL 37500" en 20. 
un L/eoL/ti uuno id place memoire nore 


12 secondes 


F Idem, mais avec la version FRE(64) 


9 secondes 



927C- 


4C 


86 


92 


In. O 




9280- 


6E 


C9 


04 


90 


01 


60 


20 


04 


9288- 


94 


A6 


73 


A 5 


74 


86 


6F 


85 


9290- 


7 


A9 


55 


A2 


00 


85 


5E 


86 


9298- 


5F 


C5 


52 


F0 


05 


20 


IF 


93 


92 AO- 


F0 


F7 


A9 


07 


85 


8F 


A5 


69 


92A8- 


A6 


6A 


85 


5E 


86 


5F 


E4 


6C 


92B0- 


DO 


04 


C5 


613 


F0 


05 


20 


12 


92B8- 


93 


F0 


F3 


85 


94 


86 


95 


A9 


92C0- 


03 


85 


8F 


A 5 


94 


A6 


95 


E4 


92C8- 


6E 


DO 


07 


C5 


6D 


DO 


03 


4C 


92 D - 


BA 


93 


85 


se: 


86 


5F 


AO 


00 


92D8- 


Bl 


5E 


AA 


C8 


Bl 


5E 


08 


C8 


92E0- 


Bl 


5E 


65 


9^ 


85 


94 


C8 


Bl 


92E8- 


5E 


65 


95 


85 


95 


28 


10 


D3 


92F0- 


8 A 


30 


DO 


C8 


Bl 


5E 


AO 


00 


92 F 8- 


OA 


69 


05 


65 


5E 


85 


SE 


90 


9300- 


02 


E6 


5F 


A6 


5F 


E4 


95 


DO 


9308- 


0-1 


C5 


94 


F0 


BA 


20 


IF 


93 


9310- 


F0 


F3 


Bl 


5E 


3 


05 


C8 


Bl 


9318- 


5E 


30 


03 


4C 


A9 


93 


C8 


Bl 


9320- 


5E 


F0 


F8 


85 


18 


C8 


Bl 


5E 


9328- 


85 


19 


C5 


6F 


C8 


Bl 


SE 


85 


9330-- 


1A 


E5 


70 


13 


E6 


AS 


19 


CD 


9338- 


14 


94 


A5 


1A 


ED 


15 


94 


9 


93 4 0- 


68 


A5 


19 


C5 


6D 


A5 


1A 


E5 


9348- 


6E 


90 


DO 


A2 


21 


CA 


CA 


AS 


9350- 


19 


DD 


13 


9^ 


AS 


1A 


FD 


14 


9358- 


94 


90 


F2 


86 


IB 


A2 


03 


BD 


9360- 


13 


94 


9D 


11 


94 


BD 


14 


94 


9368- 


9D 


12 


94 


I3D 


34 


94 


9D 


32 


937 0- 


94 


BD 


33 


94 


9D 


31 


94 


BD 


9378- 


54 


94 


9D 


52 


94 


BD 


53 


94 


9380- 


9D 


51 


94 


E4 


IB 


E8 


E8 


90 


9388- 


D6 


A6 


IB 


A5 


19 


9D 


13 


94 


9390- 


A5 


1A 


9D 


14 


94 


A5 


18 


9D 


9398- 


34 


94 


A5 


IE. 


9D 


53 


94 


A5 


93A0- 


5F 


9D 


54 


94 


AS 


8F 


9D 


33 


93A8- 


94 


A5 


8F 


18 


65 


In. 


85 


5E 


93B0- 


90 


02 


E6 


5F 


A6 


SF 


AO 


00 


93B8- 


60 


60 


A2 


IF 


BD 


34 


94 


A8 


93C0- 


F0 


F7 


38 


AS 


6F 


FD 


34 


94 


93C8- 


85 


6F 


AS 


70 


E9 


00 


85 


70 



93D0- 


BD 


13 


94 


85 


1C 


BD 


14 


94 


93 08- 


85 


ID 


88 


CO 


FF 


F0 


06 


Bl 


93E0- 


1C 


91 


6F 


90 


F5 


BD 


33 


94 


93E8- 


29 


04 


4A 


A8 


C8 


BD 


53 


94 


93F0- 


85 


1C 


BD 


54 


94 


85 


ID 


AS 


93F8- 


6F 


91 


1C 


A5 


70 


ca 


91 


1C 


94 0- 


CA 


CA 


10 


B8 


A2 


IF 


A9 


00 


94 08- 


9D 


34 


94 


9D 


14 


94 


CA 


10 


9410- 


F7 


4C 


91 


92 


FF 




FF 


FF 


•••• UH- 

















Enseignement Assiste par Ordinateur pour Ordinateurs 



MOPPE D'ANPICO 



- SILEX 
COURS 
APPLESOFT 



• ITT 2020 - APPLE II - APPLE II 
EN FRANC AIS ^^^^ 



de BASIC 



- APPLE II ( + Carte APPLESOFT ) r 

- APPLE II + J 
APPLE III 



PALSOFT |- 
SILROL |- 
( Sur Uliiy'JETTES 5 1/4 Pouces - 



MOPPE D'ANPICO ( + APPLESOFT en ROM ) 
ITT 2020 ( + Carte PALSOFT ) 
SILEX ( de Leanord ) 

DOS = DOS 3.3 - Kemp ire = 48 K. ) 



V COURS 1 £ BASIC ) - En Frajigais 

TRES PROGRESSIF - Ne necessite aucune connaissance prealable en 
inf ormatique. , 
Pour debutants et non debutants,, TOUT Y EST EXPLIQUE. 
20 Legons - Environ 10 h 12 Heures de cours. 
80 Exercices commentes, expliques, re solus, executes,, 
140 Questions notees sur 20, par groupes,, - Reponses aux questions. 
GRAPHISKE BASSE et HAUTE RESOLUTION, 

Defilement automatique du Cours avec arrets et reprises possibles 
' en cours de legon. 
De nombreux exercices peuvent etre reexecutes autant de fois que 
vous le souhaitez. Ainsi, vous pouvez obtenir les memes re'sultats 
ou des resultats different s en faisant varier les donnees d' entree. 



I A LA 



FIN 



DE 



CE 



COURS, VOUS SAUREZ PROGRAUIER. | 



o 



2/ COURS 2 ( BASIC + ) - En Frau^ais 

. Philosophic generale identique a celle du COURS 1 ( BASIC ), 
. 25 Legons - 12 Heures de cours minimum. 
o^l20 Exercices commentes, expliques, resolus, executes. 
. 160 Questions notees sur 20, par groupes - Reponses aux questions. 

3/ CONTRATS-LOCATIOK du COURS BASIC ^ut: 

• Etablissements d 'Enseignement. 

o Etablissements de Formation payante. 

. Centre de Recherches, Laboratoires, Centre d'Essais, 

, CoEiit-i; d ' Entreprises*. 



, ccurs 2 { basic + J 

Prix donnes a titre indicatif, pouvant 
ttre aiodifi^a sans preavis. 




C N T 



E U R S, 
T E Z - 



N 'O U S, 
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MAfiAl 

informotique 

vous apporte 

ASSISTANCE et CONSEIL 

pour la 

MISE EN SERVICE 

de votre 

1 er MICRO-ORDINATEUR 

• Realisation de logiciels specifiques 

• Organisation de sessions d'initiation a 
I'ordinateur et de formation a I'utilisation 
des programmes sur APPLE II et Goupil 

• Location de materiel 
courte ou moyenne duree 



Configuration 


Week-end 


1 re Semaine 


Semainesup. 


Apple II 48 K/Roppy/mon. 
Apple II 48 K/2 Roppy/mon. 
Apple II Pascal 2 Floppy 
Imprimantes 


350FH.T. 
450FH.T. 
550FH.T. 


700FH.T. 
900FH.T. 
1 100FH.T. 
5 % du P. Vte 


400FH.T. 
500FH.T. 
600FH.T. 
3%du P. Vte 



• Contrats d'entretien de materiel 




tipple et goupil 2 



Aide au choix de logiciels standards 



Demandez une demonstration de nos Logiciels Stan- 
dards Interacts « Serie S » pour APPLE : 
(Tous compatibles entre eux et avec VfSICALC) 

* SUPER-GENEFICHE version PRO (65% de capacite supple- 
mental sur un APPLE 64 K r et de nombreuses extensions 
nouvelles) 

• S/FACTURE {pour la facturation} • S/ETIGUETTE (pour le 
mailing) 

* S/COURRIER (pour le courrier personnalise et le traitement 
de texte) 

• MODIFICHE (utilitaire de transformation desficrners) 



AMAAA4 

A^A informotique 

1 a 5, rue Gutenberg 
75015 PARIS (M° Javel) 

tel. : (1)577-59-39 



UBLOAD FRE<64> 












3CALL 


-1 


51 














*927C + 9417 














927C- 


4C 


86 


92 


E5 










9280- 


6E 


C9 


n si 

04 


90 


1 


60 


20 


04 


9288- 


94 


A6 


73 


A 5 


74 


86 


6F 


85 


9290- 


70 


A9 


IS* IS* 

bb 


A2 


00 


85 


5E 


86 


9298- 


5F 


C5 


bZ 


F0 


5 


20 


IF 


93 


92A0- 


F0 


F7 




07 


85 


8F 


A5 


69 


92 A 8- 


A6 


6A 


8 b 


5E 


86 


5F 


E4 


6C 


92B0- 


DO 


04 


IS* 

CD 


613 


F0 


05 


20 


12 


92 IE: 8- 


93 


F0 


EI* O 

r J 


85 


94 


86 


9 b 


A O 

A9 


92C0- 


03 


85 


o r* 
or 


A IS* 

Ab 


94 


A 6 


r*i is* 

9b 


r** /i 

E4 


92C8- 


6E 


DO 


ft "7 

7 


f**» IS* 

L5 


/ 1*\ 
6D 


i*\ n 

DO 


03 


4C 


92D0- 


BA 


93 


r\ in* 
OJ 


5E 


86 


IS* i— 

bl- 


a n 

AO 





92D8- 


Ed. 


5E 


A A 

HR 


C8 


Bl 


IS* I*** 

bE 


n ^**i 

08 


/**• o 

C8 


92E0- 


Bl 


5E 


L is* 


94 


f**i IS* 

8 b 


94 


/**• o 

C8 


!**■ 4 

Bl 


92E8- 


5E 


65 


YD 


8 b 


/*> IS* 

9b 


**> r**i 


1 


i*\ o 
D3 


92F0- 


8A 


30 


l*\ ft 

DO 


C8 


Bl 


5E 


AO 


00 


92F8- 


OA 


69 


f\ is* 

Ob 


65 


5E 


85 


5E 


/*^ n 

90 


93 0- 


02 


E6 


IS* I**" 

bF 


A6 


5F 


l*** yi 

E.4 


95 


DO 


93 8- 


04 


C5 


94 


F0 


BA 


20 


IF 


93 


9310- 


F0 


F3 




5E 


30 


05 


CS 


Bl 


93 1 8- 


5E 


30 


03 


4C 


A 9 


93 


CS 


Bl 


9320- 


5E 


F0 


i*** ft 
1- 8 


85 


18 


C8 


B 1 


5E 


93 2 8- 


85 


19 


Cb 


6F 


C8 


Bl 


5E 


85 


9330- 


1A 


E5 


•*y 

7 


B0 


E6 


AS 


19 


CD 


93 38- 


14 


94 


A IS* 

Ab 


1 A 


ED 


15 


94 


90 


9340- 


68 


A5 




C5 


6D 


A 5 


1 A 


E5 


9348™ 


6E 


90 


l*\ ft 

DO 


A2 


81 


CA 


CA 


A5 


9350- 


19 


DD 


H <***i 


94 


AS 


1 A 


FD 


14 


93 58- 


94 


90 


r 2 


86 


1 B 


A2 


03 


BD 


9360- 


13 


94 


9u 


1 1 


94 


BD 


14 


/**• /i 
94 


9368- 


9D 


12 




BD 


94 


94 


9D 


92 


9370- 


94 


BD 


y j 


94 


9D 


91 


94 


i**i i*\ 
BD 


9378- 


14 


95 


VIJ 


H '*> 

12 


r*i is* 

9 b 


r*i i*\ 

BD 


1 3 


r*»is* 

9 b 


9380- 


9D 


11 


Q«** 

7, J 


h4 


•i i**i 
1 I:* 


r* ***• 
C.O 


l~* o 

1:8 


O ft 

y 


9388- 


D6 


A6 


•I i"i 

lb 


A IS* 

Ab 


19 


9D 


•1 o 

13 


94 


939 0- 


A5 


1A 


O Pi 


.1 ft 
14 


94 


A IS* 

AS 


18 


9D 


93 98™ 


94 


94 


A IS* 


5E 


9D 


13 


9 b 


A IS* 

Ab 


93 A 0- 


5F 


9D 


1 4 


95 


A IS* 

Ab 


i— 
81- 


/**! I*\ 

9D 


/**i/**i 
93 


93 A 8- 


94 


A5 


81- 


18 


y is* 

6 b 


IS* 1"* 

bl::. 


O IS* 

8 b 


IS* I*** 

bb 


93 B0- 


90 


02 


i*** / 
I:.. 6 


5F 


A 6 


5F 


A 





93B8-- 


60 


60 


A •"> 

A2 


79 


BD 


94 


94 


A8 


93 C 0- 


F0 


F7 


38 


A 5 


6F 


FD 


94 


94 


93 C 8- 


85 


6F 


A5 


70 


E9 





85 


70 


93D0- 


BD 


13 


94 


85 


1C 


BD 


14 


94 


93D8- 


85 


ID 


88 


CO 


FF 


F0 


06 


Bl 


93E0- 


1C 


91 


6F 


90 


F5 


BD 


93 


94 


93 E 8- 


29 


04 


4A 


A8 


C8 


BD 


13 


95 


93 F 0- 


35 


1C 


BD 


14 


95 


85 


ID 


A5 


93 F 8- 


6F 


91 


1C 


AS 


70 


CS 


91 


1C 


94 0- 


CA 


CA 


10 


B8 


A2 


79 


A9 


00 


94 08- 


9D 


94 


9^ 


9D 


14 


94 


CA 


10 


9410- 


F7 


4C 


91 


92 


FF 


FF 


FF 


FF 



<*5<m- Eft 
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La lecon de calcul 



ANNIE MAUFFREY 

L'objectif de ce programme est d'initier et d'entrainer vos enfants a la 
multiplication, en la presentant comme a l'ecole. Le programme demande d'abord 
s' il doit fonctionner en mode demonstration (initiation) ou si 1 'utilisateur fait 
lui-meme la multiplication ( entrainetnent) . Dans les deux cas , 1' uti lisateur 
choisit le nombre de chiffres du multiplicateur et du multiplicande. 

En mode initiation, toutes les etapes de la multiplication sont expliquees et 
c'est 1 'uti li sateur qui est maitre du deroulement dans le temps de l'operation. II 
lui faut, en effet, appuyer sur une touche pour poursuivre apres chaque calcul 
elementaire. En mode entrainement , l'operation se deroule comme a la main. Seul le 
decalage d'une ligne a 1' autre est automatique. Au bout d'un nombre de fautes (ici 
fixe a 4) le programme se branche automatiquement en mode demonstration pour 
terminer l'operation. 



Je n'ai pas cherche a optimiser la programmati on , le seul objectif etant de rendre 
moins fastidieux 1 ' apprentissage de la multiplication. On pourrait etendre ce 
programme dans plusieurs directions, par exemple : multiplication de nombres 
decimaux, limitation du temps de reponse, ou meme multiplication dans une autre 
base... En revanche, c'est volontairement qu'il n'y a pas possibility de eontrole 
a posteriori, ni systeme de notation, du travail de 1 'enfant pour qu'il le fasse 
de lui-meme, avec plaisir et sans crainte de jugement . 



10 DIM A%(9) ,B7.<9> ,S%<18) 
20 REM xx******************** 
x x 
x MENU * 

x x 
xxxxxxxxxxxxxxxxxxxxxx 

3 HOME : PRINT "PREFEREZ-VOUS { " 
t HTAB St VTAB 5? PRINT "l-Q 
UE JE FASSE LA MULTIPLICATIO 
N?" 

40 HTAB St VTAB 10 J PRINT "2 -LA 
FAIRE VOUS -MEME?" 

50 VTAB 15: PRINT "REPONDEZ PAR 

LE NUMERO DE LA QUESTION" ♦ VTAB 
20 : GET A*: PRINT A*:IND7. ^ 
VAL <A*>: IF ASC (A*) < 49 
OR ASC (A*) > 50 THEN 50 

60 HOME J PRINT "LE MULTIPLICAND 
E ET LE MULTIPLICATEUR SON 
T DES NOMBRES DE 1 A 9 CHIFF 
RES, A VOUS DE CHOISIR" 

70 VTAB 10 5 PRINT "NOMBRE DE CHI 

FFRES DU multiplicande: "j: GOSUB 
54o:lat. ~ VAL <Z$) 
80 VTAB 15: PRINT "NOMBRE DE CHI 

FFRES DU multiplicateur: ";: 



10 



110 



12 



130 



HO 



150 



160 



170 



180 

19 

20 



GOSUB 54 0tLB7. 



VAL (Z*> 



90 REM xxxxxxxxxxxxxxxxxxxxxx 
x CHOIX DES NOMBRES x 
x ET x 

x ECRITURE SUR ECRAN x 

/i\ /R /in /ti /ti /ti /ti /»\ /ri /»\ /i\ /i\ ^ /n /n /n sn /i\ /i\ 



FOR I = 

:faut = o: 

25: FOR I 

1 

GOSUB 40 : 
1 THEN 110 

A%<i) = ch: 



to is:s%<i) = o: 
home :vs = 3:ph 

= LA% TO 1 STEP 



NEXT 



IF CH 



AND I 



GOSUB 420 : NEXT I 



!10 



vs ••== 4: vtab vs: htab 22 - lb 
%: print "x m j:ph = 25: for 

I = LB7. TO 1 STEP - 1 
GOSUB 400: IF CH « AND I ■ 
1 THEN 140 
B7.CI) » CH: GOSUB 420 : NEXT I 

:pv » s: gosub 440 

REM xxxxxxxxxxxxxxxxxxxxx 
x CALCUL ET x 

x AFFICHAGE LIGNES x 

/l\ «T\ /I\ ^ ft\ »T\ /f\ /TV /l\ /TV /l\ /TV /%\ St\ /A /l\ /I\ /l\ /TV /TV /TV 

FOR I = LB% TO 1 STEP - UP 
H * 25 - LB% + i:PV = PV + 1 
: IF B%(I) = THEN PV «= PV - 
i: GOTO 26 

IF I < LB% THEN GOSUB 63 
FOR J » LA7. TO 1 STEP - 1 
MULT% = A%(J) x B%(I):S%(I + 

j) ~ S7.cr + J) + mult%:mult% 

» MULT% + RET%:RET7. = MULT7. 
/ lOtCH = MULT% •- RET% x 10 

:vs = pv:en% = o: if ind% = 

1 THEN GOSUB 580 : GOTO 220 
GOSUB 48 
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220 GOSUB 420 t IF RET% » THEN 
250 

230 CH - RET%:VS = 15 IF J < > 1 
THEN EN% = LB% - U GOSUB 4 
80 t GOSUB 420 :ph - PH + li GOTO 
250 

240 VS » PV? GOSUB 480 ♦ GOSUB 420 
250 NEXT J 

260 GOSUB 650 : IF IND% = 1 AND I 
< > 1 THEN VTAB 21 t SPEED* 
80 t PRINT "JE DECALE D'UN CH 
IFFRE VERS LA GAUCHE" i FOR L 

- 1 TO 100 : next l: speed* 



270 RET% * 0: FOR K ~ 24 TO 24 - 
LA% ~ LB% STEP - i: VTAB li 

HTAB K: PRINT " "J NEXT KJ NEXT 
li IF LB% = 1 THEN 360 

280 PV = PV + 1 * GOSUB 440 

x CALCUL ET * 

x AFFICHAGE SOMME x 

Mf M* M/ MS M/ W W W M/ M/ M/ M/ M/ M/ W y/ \|/ \fl/ M/ \|/ V|/ 

/•» /Ti /Ti /Ti /Ti /tw /tw /tw /•» /Ti /Ti /Ti /Ti /Ti /rw ^vw /Ti «\ /Ti /rw /•» 



300 PV * PV + 1JPH » 25JEN% = 
310 FOR I ~ LA% + LB% TO 1 STEP 
- 1JRET% * S%(I) / lOiCH » 
S%(I) - RET% x 10:S7.(I - 1) * 
S%(I - 1) + RET%» 
320 VS * PVt IF I < > 1 OR S%<I) 

> THEN GOSUB 480 i GOSUB 

420 

330 NEXT I i VTAB 21 X IF IND% * 1 
THEN SPEED* 80 { PRINT "J'A 
I FAIT LA SOMME DES "}LB%}" 
LIGNES OBTENUES"} SPEED* 255 

340 IF IND% * 2 THEN HTAB 29: VTAB 
15! FLASH : PRINT "xxxxxxxxx 
"J HTAB 29 X VTAB 16 X PRINT " 
x BRAVO x"J HTAB 29 i VTAB 17 
: PRINT "xxxxxxxxx" ; NORMAL 

350 IF IND% * 1 THEN GOSUB 650 ♦ 
VTAB 20 t HTAB 15: PRINT "A 
VOUS MAINTENANT" 

36 GOSUB 65 : VTAB 23: HTAB 10 : 
PRINT "ENCORE UNE? ( O OU N 

)•■:: get b$: if b* = "O" then 

30 

370 IF B$ < > "N" THEN 360 
380 END 

390 REM xxxxxxxxxxxxxxxxxxxxx 
x x 
x SOUS-ROUTINES * 
x x 
xxxxxxxxxxxxxxxxxxxxx 

400 REM xx CHOIX CHIFFRE xx 

410 CH * INT ( RND (1) x 10): RETURN 

420 REM xx AFFICHAGE xx 

10 Pom's 



43 PH - PH ~ i: HTAB PH + EN%: VTAB 

vs: print ch: return 

440 REM xx AFFICHAGE LIGNE xx 
45 VTAB PV: FOR I * 24 - LA% - 
LB% TO 24: HTAB i: PRINT "-" 

; : next i: return 

460 REM xxxxxxxxxxxxxxxxxxxx 
x TEST x 

V Mf V Mf V/ V/ V/ ¥f M/ \u \u \j/ \j/ m/ \is \i/ m/ \is m/ ixr 

/Tt /•» /Ti /•» /•» /•» /•» jTl /•» /•» /Yl /l\ /l\ /Tl Jnf\ JT\ /l\ /i\ J*f\ /rl 

47 VTAB i: HTAB PH: PRINT RET%: 

RETURN 
480 REM xxxxx TEST 

49 IF IND% * 1 THEN RETURN 

50 HTAB PH + EN% ••• i: VTAB VS: GOSUB 

540 

510 IF VAL (Z*) * CH THEN RETURN 

520 FAUT * FAUT + 1 : IF FAUT > 3 THEN 
IND% = i: VTAB 21 : SPEED* 40 
: PRINT "VOUS AVEZ FAIT QUAT 
RE FAUTES "{ VTAB 23: HTAB 7 
: PRINT "JE VAIS FINIR VOTRE 
MULTIPLICATION":: SPEED* 25 
5: RETURN 

53 GOTO 50 

540 REM xxxxxxxxxxxxxxxxxxxx 
x ENTREE ET x 

x ECRITURE RESULTATX 

¥f V/ V/ V/ V/ NV \V NV NV NV NV NV V/ V/ V/ V/ V/ V/ V/ V/ 
sTi /Ti /Yi /■» /•» /•» /•» /•» /•» /•» /Ti /Ti /Ti /Ti /Ti /i\ /ri 

550 GET Z* 

560 IF ASC <Z$) < 48 OR ASC (Z 

$> > 57 THEN 550 
57 PRINT Z*: RETURN 

50 R IE! M )K )K )K )K )K )K )K )K )K )K )K )K XC ^ )K ^ )K ^ j4( ^ 

x EXPLICATIONS x 
/'K )K y£ y^ y^ y^ y^ y^ y^ y^ y^ y^ y& y& 

590 HTAB 29: VTAB 6: PRINT SPC( 

8): HTAB 29: VTAB 9: PRINT SPC( 
10) 

600 W = A%<J) x B%(I): HTAB 29: VTAB 

6x print b%(i):"x"ja%(j) j "== 
"}w: htab 29: vtab 9: print 
w;"+":mult% - w:"*":mult% 
610 htab 29: vtab 12: print "je 
pose "jch: htab 32: vtab 15: 

PRINT "ET": HTAB 29: VTAB 1 
8: PRINT "JE RETIENS ";RET% 
620 GOSUB 650 : VTAB 21 J PRINT "P 
OUR QUE JE CONTINUE, ": VTAB 
23: HTAB 7X PRINT "APPUYER S 
UR UNE TOUCHE": GET A$: RETURN 

630 REM xx TRACAGE DE ♦♦. xx 
64 FOR K * 1 TO LB% - i: HTAB 2 

5 - K: VTAB PV: PRINT ".": NEXT 

K: RETURN 
650 REM xx EFFACE BAS ECRAN xx 
660 FOR H * 1 TO 40 : POKE 1615 + 

H,160: POKE 1871 + H,160: NEXT 

: RETURN 

n° 2 



Banc d'essai d'utilitaires de documentation 



HERVE THIRIEZ 



1. Presentation general e. 

Dans cet article, nous nous inter essons a des utilitaires de mise au point et 
documentation de programmes. Toutes les semaines, de nouveaux utilitaires arrivent 
sur le marche. Nous nous limiterons en regie generale a 1 'analyse de ceux ayant 
deja atteint un certain niveau de diffusion ou, le cas echeant, d T un interet tel 
qu'il faut les faire connaitre le plus rapidement possible. 

Les trois utilitaires retenus pour cette analyse sont, dans l'ordre alphabetique , 
Apple Doc, Dakin, et le DOS Tool Kit, qui permettent tous trois la reference 
croisee de variables, c'est-a-dire la liste des numeros d T instructions dans 
lesquelles chaque variable est citee. Cet article fait suite a ceux par us dans 
POM'S No 1 au sujet des progiciels PLE et CRAE. 

Les utilitaires ont ete compares a l'aide d'un petit programme servant a imprimer 
une par une des adresses sur des enveloppes. Dans le cas d 1 Apple Doc, la liste et 
les references croisees de variables et de numeros d 1 instruction seront fournies a 
titre d T illustration. Suivent les references croisees fournies par Dakin. 



2. Apple Doc. 

Ce progiciel possede quatre fonctions principales : 

! sur tout 
! ou partie 
! du programme 
! concerne 



- reference croisee des noms de variables 

. reference croisee des numeros d T instruction 

- liste de programme 

- recherche et modification eventuelle de chaine 



Apple Doc fonctionne aussi bien en DOS 3-2 qu'en 3.3. II suffit pour passer a la 
version 3.3 de MUFFINiser la version anterieure. 

Apple Doc se distingue par la possibility de definir, et memoriser eventue llement , 
une description en toutes lettres de la signification d'une variable ou d'une 
ligne. Celle-ci apparait alors dans la reference croisee, comme nous pouvons le 
voir dans la liste de notre petit programme de demonstration. 

Dans la reference croisee de variables, Apple Doc fait apparaitre le nombre 
d T indices de chaque tableau, alors que Dakin se contente de faire la distinction 
entre variables indicee.s ou non. 

L T interet principal d T Apple Doc reside dans le fait qu T il fonctionne sous la forme 
de fichiers EXEC. II arrive souvent que 1 T on desire utiliser les fonctions d T un 
tel progiciel pendant la mise au point d*un programme; avec les fichiers EXEC, il 
est possible d T utiliser Apple Doc pendant que le programme a documenter reside en 
memoire . 

L 1 inconvenient majeur d T Apple Doc, en ce qui me concerne, est la mauvaise presen- 
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tation des resultats : les 80 colonnes de 1 T imprimante sont mal utilisees par la 
reference croisee; il n T y a pas un bon remplissage de la ligne. Mais ce n'est pas 
visible sur le court programme documente a titre d'exemple. Le resultat est plus 
long et moins agreable a lire que celui obtenu avec Dakin, surtout si 1 1 on 
n T utilise pas la possibility d'associer une definition a chaque variable ou numero 
de ligne. 

Cet inconvenient peut etre tourne en modifiant les programmes d 'Apple Doc, mais il 
me semble plus equitable, lors de la comparaison de programmes, -de comparer les 
versions sous lesquelles ces programmes sont commercialises, et non telles que 
l T on peut les ameliorer . 

Remarque sur Apple Doc : Apple Doc e erase en partie les zones memoir e utilisees 
par le PLE et CRAE. Apres avoir utilise Apple Doc, il faut done recharger ces deux 
utilitaires. Vous pouvez creer un fichier EXEC a cet effet, qu'il suff ira 
d'appeler apres avoir travaille avec Apple Doc. 



3. Dakin. 



Le point commun entre Apple Doc et Dakin est l 1 existence de programmes destines a 
etablir les references croisees de lignes et de variables, et la liste d T un 
programme. A part ces fonctions, Dakin apporte de nombreux autres services, de 
qualite et d'interet tres inegaux. 

II y a deux disquettes Dakin vendues ensemble dans la version DOS 3-2. La premiere 
est plus ancienne, ce qui explique 1 T existence du programme TEXT FILE COPY, a lors 
que le COPIER (qui se trouve sur l'autre disquette) fait tout et mieux. 
Malheureusement , Dakin ne marche en DOS 3-3 ni sous BASICS, ni transf orme par 
MUFFIN. II vous reste, si vous passez au DOS 3-3, a acheter la version 3-3, ou a 
decouvrir dans diverses revues ou par vous-meme les modifications necessaires. 

Voici la description des diverses possibilites de Dakin, au-dela de la 
documentation de programme : 

PEEKER : analyse du contenu d T enregis trements selectionnes d'un fichier a acces 
direct. On peut se construire sans effort un petit programme Basic aussi puissant 
et nettement plus flexible d 1 utilisation . 

CRUNCHER : le plus original et le plus utile des programmes du Dakin. Cet 
utilitaire sert a comprimer au maximum un programme en otant les remarques et en 
regroupant les lignes r attachables . 

TEXT FILE COPY : inutile. 

PROMPTER ; exemple de routine d T input generalise. De toute fagon, chaque 
utilisateur a interet a construire la routine correspondant a ses besoins propres.- 
CALCULATOR : exemples de calculs a grande precision. 
DISKETTE COPY : inutile. 
SCREEN PRINTER : copie d T ecran texte. 

ARRAY EDITOR : editeur de fichier sequentiel . Peut etre interessant, en 
particulier pour analyser et modifier un fichier EXEC. 

COPIER : copie de fichier de quelque nature que ce soit. II vaut mieux utiliser 
FID, fourni avec la disquette Master du DOS 3-3, et disponible en 3.2 (par 
DEMUFFIN) . 

PATCHER : inutile. 

En matiere de documentation de programme, Dakin est tres lent, compare a Apple 
Doc, surtout dans la version DOS 3-2. En effet, il faut dans ce cas pour 
l T utiliser booter, ou faire "RUN UT0001 n ou "RUN UT0002 n suivant le service 
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demande. Afin de lister un programme et d T en obtenir la reference croisee de 
lignes et de variables, il faut, dans 1 1 ordre : 

. charger le menu de la disquette 1 de Dakin 
_ charger le programme de liste 

- charger le programme a documenter 

. recharger le menu pour arreter le travail sur la disquette 1 

. charger le menu de la disquette 2 pour appeler le programme de reference 

croisee de variables 
_ charger le programme de reference croisee de variables 
. recharger le programme a documenter 

. recharger le menu pour appeler le programme de reference croisee de numeros 
de lignes 

- charger le programme de reference croisee de numeros de ligne 
. recharger le programme a documenter 

. et, si on veut terminer sans utiliser le RESET, recharger le menu pour lui 
dire que 1 1 on a f ini . 

Par comparaison, avec Apple Doc, le programme a documenter est charge une fois 
pour toutes. On execute alors consecutivement EXEC LISTER, EXEC VARDOC et EXEC 
LINEDOC. Un gain de temps gigantesque ... 

Remarques sur le CRUNCHER : cet utilitaire elimine seulement les remarques si 
elles sont separees et correspondent a un numero de ligne non reference par un 
GOTO ou GOSUB. Pour une remarque referencee, il restera (heureusement ) le numero 
de ligne et REM. Le REM demeure aussi quand la remarque etait incorporee dans une 
sequence d T instruct ions separees par des 

Limitations de Dakin : 

tres lent pour la documentation, surtout en DOS 3-2. En DOS 3-3, tout se trouve 
sur une disquette unique. 

le LISTER n*est pas sur la meme disquette que les autres programmes de 
documentation en DOS 3-2. 

l^criture des dates n*est pas libre; il faut absolument respecter le mode 
americain d'ecriture des dates, sauf si 1 1 on se trouve dans les douze premiers 
jours du mois ! 

. il faut rentrer les parametres de l'imprimante a chaque execution. 

certains programmes ne peuvent imprimer un nom de programme different de celui 
sous lequel il est memorise sur disquette. 

Limitation conjointe de Apple Doc et Dakin : pour la reference croisee de 
variables comme de numeros d T instruction, ces deux programmes ignorent tout ce qui 
est consecutif a un DATA, sous le meme numero d 1 instruct ion. On peut le constater 
sur notre exemple a l'aide de la ligne 150 : ni les variables, ni la reference a 
1 T instruction 60 n T apparaiss ent dans les references croisees. 

4. DOS Tool Kit. 



DOS Tool Kit ne se limite pas a la documentation de programmes. II comporte en 
fait trois parties fort differentes : 

a) 1 T assistance a la programmation avec des fonctions de renume rotation (toutes 
les possibilites du RENUMBER, moins le bug classique), la numerotation automatique 
en option, une fonction de compression de remarques, divers gadgets et une refe- 
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rence croisee de variables. 



b) un generateur de caracteres haute resolution tres flexible, permettant entre 
autres de superposer un texte quelconque a des images haute resolution. 
Passionnant et tres riche. 

c) un assembleur-editeur que nous n T avons pas eu le temps de tester, mais dont on 
ne nous a dit que du bien a ce jour. 

L T assistance a la pr ogrammation fournie par DOS Tool Kit suppose que celui-ci 
reside en memoire en permanence durant la mise au point d ! un programme Applesoft. 
Ne pouvant cumuler, je prefere franchement utiliser a cet effet le P.L.E. et le 
C.R.A.E. dont les services en matiere d T assistance a la programmation me semblent 
sensiblement plus utiles. 

Ceci n'enleve rien a l'interet des autres possibilites de ce progiciel, mais nous 
debordons avec le generateur de caracteres haute resolution et l'assembleur 
editeur le theme qui nous interesse dans cet article. 



5. Conclusion. 



Pour ma part, j T utilise Apple Doc en documentation pendant la mise au point des 
programmes. Dans cette phase, il vaut mieux gagner du temps qu T economise r le 
papier ou fignoler la presentation. Dakin me sert a produire la reference croisee 
du programme, et a le compresser en utilisant le CRUNCHER. 




10 GOTO 150 
2 Z* « "" 

30 GET R*i IF ASC (R*) « 13 THEN RETURN 

40 IF ASC (R*) < 32 OR ASC (R*) > 9 THEN 30 

50 print r*;:z* = Z* + R*t GOTO 30 

60 TEXT t HOME t FOR L « 1 TO 61 PRINT N*(L) TAB ( 13 ) " ♦ §, R*( L) J ♦ HTAB 15: 

GOSUB 20: IF Z* < > "" THEN R*(L) ^ Z* 
70 PRINT t PRINT i NEXT i INVERSE i PRINT "ENREGISTREMENT CONFIRME" J ♦ NORMi 

: input " : n ;r$: if left* <r*,d < > ,, o M then 60 

80 R$<4) a R$(^) + " - " + R$(5):R*(5) * CHR$ (13) 

90 PRINT t PRINT "ALLUMER L ' IMPRIMANTE" ♦ GET R*:D* « CHR* (13) + CHR* ( 

PRINT t INPUT "ENVELOPPE LONGUE ? "JR*: PRINT D* ,, PR#1" 
10 IF LEFT* (R*,l) = "0" THEN PRINT : PRINT : PRINT 

110 FOR L = 1 TO ^ {R * ( L ) « LEFT* (BL*,25 + 15 x (R* « "0")) + R*(L){ NEXT 
JR*(6) « " " + R*(6) 

12 FOR L = 1 TO ?! PRINT i NEXT : FOR L - 1 TO 6! PRINT R*(L)t NEXT 

13 PRINT D*"PR#0": PRINT i INPUT "UNE AUTRE ENVELOPPE ? n JR*: IF LEFT* 

(R*,l) < > n n THEN END 
140 FOR L « 1 TO 6tR*(L) = ""J NEXT i GOTO 60 

150 DATA NOM > ADRESSE l.ADRESSE 2, CODE POSTAL > VILLE f PAYS ♦ BL* « " " i FOR L * 
1 TO 6t READ N*(L):BL* « BL* + BL* ♦ NEXT : GOTO 60 
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*M *M *M *W ^xf ^xr axt aat >^ >^ yt* yt* ym* ym* ym* 

jTv jTv jTv jTk jTk jTk jTk jTk jTk jTl ^Tk ^Tk ^Tk ^Tk ^Tk 

* * 

* ENVELOPPE * 

* — >TABLE OF VARIABLES*! — * 



BL* - BLANC 
110 

D$ - CHR*(13)+CHR*<4> 
90 90 130 

L - INDICE COURANT 

60 60 60 60 110 110 110 120 120 120 140 140 

N$<*) - NOMS DES RUBRIQUES 
60 

R* - REPONSE 

30 30 40 40 50 50 70 70 90 90 100 110 130 130 

R*<*) - REPONSES AUX RUBRIQUES 

60 60 80 80 80 80 110 110 110 110 120 140 

Z* - CHAINE FOURNIE EN REPONSE 
20 50 50 60 60 

END OF VAR« LIST 



3tt * 

* ENVELOPPE * 

* — >TABLE OF LN* XREFS<-~ * 
x x 



2 - ROUTINE DE LECTURE GENERALISE E 

60 



30 
40 50 



6 - TRAITEMENT PRINCIPAL 
70 140 

150 - INITIALISATION 

10 



END OF LN# LIST 
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** THE VARIABLE CROSS REFERENCE ** 



PROGRAM NAME* ♦ ♦ENVELQPPE 
DATE. . .(H/12/81 

BL* 
110 

D* 

90 90 130 



60 60 60 60 110 110 110 120 120 120 140 140 

N*< 
60 

R* 

30 30 40 40 50 50 70 70 90 90 100 110 130 130 
R*< 

60 60 80 80 80 80 110 110 110 110 120 140 
2* 

20 50 50 60 60 



** THE LINE CROSS REFERENCE ** 

PROGRAM NAME* » ♦ ENVELOPPE 
DATE . ♦ ♦ 04/12/81 



20? 60 
30? 40 50 
60J 70 140 150 
150 J 10 




M ftlMWIl 



APPLE 



ILE PLUS MODULATE 
DU DISQUE 3P AU DISQUE DUR 
LE PLUS CONNU 



LOGIC I ELS 



PET 2 OOlW PARTICULAR 

C BM 300 iB! c _ , A N I IFIQUE 
CBMsooi 




. STOC KS 
. PAYE 

. F AC TU R AT ION 
. TRAITEMENT DE TEX TE 
. COM PTA B I L I TE GENE RALE 
. GESTION DES COMMANDES 
. BIJOUTIER. MEDICAL. DENTISTE 
.GESTION DE FICHIERS 
-ASSURANCES 

FORMAT IO N. 

STAGES D'INITIATION 
BASIC. PASCAL. FORTRAN 



IGESTION 



MICRO ORDINATE UR SHOP 

SOIJBIRON SA. 

9 RUE KENNEDY TOULOUSE 

TEt.2I.64.39.y2I.04.57. 
TELEX. LPS. INF 521075 F 



100m 2 D EXPOS I TION 



DU SCIENf IFIQUE 
AU BUREAU 
D* ETUDE 



PCC 2000 

ISTCsooo 



VIDEO 
GENIE 

EG 3003 



1 



S.A.V. 

DE PANNAGE SOUS 48 H 
REGION MIDI PYRENEES 

DU GENIE 
POUR PETITS 
ET GRANDS 



_ LIBRAIRIE 

.SPECIALISE 
_ I N FORMATIQUE 



SHARP 
PC 1211 
MZ 80 



|DU MOINS 

:her au 

IPARTICULlECt 



CHOIX EN MICRO INFORM ATI QUE 



Une incursion dans les mysteres du DOS 



JEAN-FRANCOIS DUVIVIER 



Voici quelques modifications qui vous permettront de disposer d T un DOS 
personnalise , avec certaines particularities bien utiles. Ces changements peuvent 
s'appliquer indif f eremment a un DOS 3.2 ou 3-3 mais les adresses ne sont valables 
que pour un 48 K. Dans les autres cas, vous devez retrancher a toutes les adresses 
citees la valeur hexadecimale $4000 pour un 32 K, $8000 pour un 16 K. 

1. Elimination de la pause lors d'un catalogue (lorsque celui-ci est trop long 
pour tenir dans un ecran). 

Normal: *ADA4: 16 (Poke 44452,22) 
Modi fie: *ADA4: FF (Poke 44452,255) 

Lors d*un catalogue, le DOS tient a jour dans la case memoire $B39D le nombre de 
lignes a editer avant d'effectuer une pause. Cette valeur est initialisee avec le 
contenu de l'adresse ADA4, normalement 22. Lorsqu'on 1 T initialise avec une valeur 
superieure a 120, on supprime totalement la pause, le catalogue ne pouvant 
contenir que 120 lignes en DOS 3-3 et 96 en DOS 3-2. 



2. Arret du catalogue par la touche "ESC" lors d'une pause. 



Normal : 



Modifi* 



*AE39 
*BCE0 
*AE39 
*BCE0 



20 0C FD 

zone inutilisee 

20 E0 BC 

20 0C FD C9 9B DO 05 
68 4C 7F B3 60 



Le saut a la pause du catalogue est remplace par un saut a l T adresse $BCE0. Le 
programme place a cette adresse attend alors qu*une touche soit appuyee et la 
compare avec "ESC". Si cette touche est differente, le catalogue est continue. 
Dans le cas ou l T on a appuye sur "ESC", le programme rend la main a 1 ^tilisateur 
en effectuant un saut a la routine appelante. 



3. Affichage des programmes effaces lors d*un catalogue. 

Normal: *ADD9 : 30 4A 
Modifie: * ADD9 : EA EA 

Le DOS teste pour chaque programme un octet du "directory" afin de savoir s T il est 
efface. La modification annule le branchement conditionnel qui suit en le 
remplagant par deux instructions NOP (No OPeration). Dans le cas d'un programme 
efface, une colonne a droite contiendra un caractere inverse, ce qui permet de les 
identifier rapidement . A noter que toute trace est perdue dans le directory 
lorsque le DOS a recopie un autre programme a la place de celui qui a ete efface. 



4. Bootez sur un programme binaire . 
Normal: *9E42: 06 
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Modifier *9E42: 34 pour BRUN 
*9E42: 14 pour EXEC 



Sur un DOS normal, le programme HELLO ne peut etre qu 1 en BASIC. La modification 
vous permet d 1 avoir un programme HELLO en binaire ou sous forme d*un fichier. La 
procedure est la suivante: initialiser la disquette avec un programme BASIC HELLO, 
apres avoir fait la modification; sauver ou copier le fichier binaire (BINAIRE), 
detruire HELLO et changer le nom de BINAIRE en HELLO (RENAME BINAIRE, HELLO). 



5. Suppression du NOMON lors de 1 T entree dans le DOS. 

Normal: *9DD7: 8D 5E AA 
Modifier *9DD7: EA EA. EA 

Lors de 1 T entree a chaud dans le DOS ( 3D0G qui est equivalent a 9DBFG pour un 48 
K) ou lors de l'appui sur un RESET (cas de 1 1 autostart ) , le DOS est reinitialise 
et 1 T option NOMON est mise. La modification ci-dessus permet de garder l'etat du 
MON anterieur, empechant la remise a jour de 1 T octet $AA5E qui indique les 
commandes MON C,I,0 en action. 



6. Annulation de la commande INIT. 

Normal: *A884: 49 
Modifier *A884: 5B 

II peut etre interessant, surtout avec un DOS modif ie, d 1 annuler la commande INIT 
afin d'eviter de recopier le DOS sur une nouvelle disquette. D 'autre part, une 
fois la commande INIT enlevee, on peut se servir d'une partie de la page $B6 afin 
d T y stocker d'autres routines. Le DOS maintient a jour un dictionnaire des 
commandes afin de pouvoir les reconnaitre (voir Particle de C. Guerin). La 
modification change le premier "I" de INIT par un !l J fl , caractere non accessible au 
clavier. La commande INIT ne sera alors plus reconnue. 



7. Secteurs libres a chaque commande CATALOG. 



Normal : 



Modif ie : 



*A884: 
*ADC3: 
*B600: 
*A884: 
*ADC3 : 
*B600: 
A9 00 
18 B9 
FB 48 
68 18 
40 A5 
DO 07 



49 

20 2F AE 
partie de 
5B 

20 00 B6 
A2 OC 
85 40 85 
F2 B3 F0 
E6 40 DO 
90 F0 88 
AC 00 
1B E5 



INIT 



4A F9 
AO C8 



41 

20 



60 20 24 ED 20 



20 
41 

OE OA 90 

02 E6 41 

DO E9 A6 

E0 CO 20 

20 2F AE 

2F AE 60 



La longueur de la routine impose de la placer en $B600 et done d T annuler la 
commande INIT. Cette routine est appelee apres 1 1 inscription du libelle DISK 
VOLUME et avant le saut de deux lignes precedant la liste des programmes. Elle 
compte a partir des informations disponibles dans le buffer VTOC ($B3F3 a B47B) 
les secteurs disponibles puis les affiche sur ecran. Le deroulement normal du 
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catalogue est ensuite repris. 



8. Chargement du DOS modifie sur disquette. 

II peut etre interessant, une fois que vous avez modifie votre DOS, de pouvoir en 
disposer chaque fois que vous bootez . La premiere solution consiste a construire 
un programme HELLO avec toutes les modifications que vous souhaitez . Une fois ce 
programme execute, votre DOS en RAM est modifie. 

La seconde solution consiste a initialiser une disquette avec votre DOS modifie. 
Celui-ci sera alors incorpore sur les pistes 0,1 et 2 de la disquette et 
disponible chaque fois que vous booterez. A noter que l T on ne peut charger ainsi 
la derniere modification, qui neutralise la commande INIT. 

La troisieme solution est de recopier le DOS en RAM sur les pistes 0,1,2 de la 
disquette, mais sans toucher aux autres pistes et en laissant par consequent vos 
programmes intacts. Cette methode vous permet de modifier le DOS charge sur des 
disquettes deja utilisees. II suffit pou* cela de taper les lignes suivantes: 

*300: A9 9D 8D BC B5 20 C2 

B7 20 4A B7 60 
*AA5D: 09 
*AA5F: 

*AA75: C8 C5 CC CC CF (il s T agit en fait du nom du programme sur lequel 

on veut booter. S T il fait moins de 4 caracteres, 
completer avec des es paces, dont le code ASCII 
est AO). 

Le lancement se fait par 300G ou par un CALL 768 a partir du BASIC. 



Trues et astuces 



Programme mystere ... 

Le premier lecteur qui nous fera parvenir 1 ' explication complete de ce que fait le 
programme suivant gagnera un abonnement a quatre numeros de Pom's. Ce programme 
requiert le Basic Integer en ROM, e'est-a-dire la carte Integer ou la carte 
langage. 



>LIST 

20733 CALL -936: TAB 19 J VTAB 13 

20734 DEVINETTE= ASC( "POMS" )* PEEK (-1823)/ PEEK ( -1595) *P0MS a P0 MS 

20735 POKE PEEK (-7782), 12} POKE PEEK (-4710) ,184 

20736 POKE 2069, PEEK ( RND (4096)) 
20 737 PRINT "POMS" 

20738 POKE POMS, POMS 

20739 POP 



Pom's n° 2 



19 




Afin de mieux 
tirer profit de toutes 
les possibility 
d'APPLE, 
et de ses extensions. 
Loin des contacts 
anonymes, 
pour un rapport 
plus humain, 
des revendeurs 
reqionaux specialises 
vous proposent 
des logiciels sur mesure, 
standards, ou 
d'apprentissage. 

Un service technique 
avant et apres-vente. 
N'hesitez pas a contactor le 
revendcur le plus proche 
pour un consril 
ou un renseignement 



cippkz 



en province 



Annecy/Faverges 

74210 

Bayonne 

64100 

Bordeaux 

33000 

Clermont-Ferrand 

63000 

[pernay 

51200 

Lyon 

69003 

Marseille 2 

13000 

Montpellier 

34000 

Nancy/Laxou 

54250 

Orleans 

45000 

Perpignan 

66000 

Rouen 

76100 

Strasbourg 

67000 

Toulon 

83100 

Valenciennes 

59300 



EUROPROCESS 

Siege social : Doussard 
(50) 44.31.12 

LE CALCUL INTEGRAL 

3, rue Aristide-Briand 
(59) 55.43.47 

BOUTISOFT 33 

9, rue de la Lande 
(56) 91.55.08 

MEYRIAL 

5, Bd Desaix 
(73) 35.02.70 

MAGENTA GESTION 

7, av. A.-Thevenet Magenta 

(26) 53.19.93 

CIRCE 

9, rue P.-Florenoe 
(78) 54.31.95 

ORDITEL 

Siege social : BELCODEN 
(42) 04.44.00 

IFI-MICRO INFORMATIQUE 

,!; 1 A» r, i!£ astilhon CENTER 

(67) 58.58.28 

SEMITEC 

69, rue Mareville 
(8) 340.43.38 

AMC 

13, rue des Minimes 
(38) 62.62.58 

MAB 

2, place de Catalogne 
(68) 34.04.46 

CONSEIL COMPUTER 

20, quai Cavelier-de-la-Salle 
(35) 63.36.06 

CILEC 

18, quai Saint-Nicolas 
(88) 37.31.61 

S I A 

Lepaillon, avenue de Brunet 
(94) 23.74.30 

MICROMEGA 

38, rue de Famars 
(27) 46.89.22 



Si cette publicite vous interesse, contactez le 
CALCUL INTEGRAL 



Applications de graphiques haute resolution 



GUY MATHIEU 



A. Quelques rappels 



Le graphique dit de "haute resolution" presente sur Apple II les carac ter istiques 
suivantes : 

. 280 x 192 sans texte, ou 280 x 160 avec 4 lignes de texte. 

, 8 couleurs, dont deux noirs et deux blancs. II existe sur le marche 

des cartes permettant d ! obtenir 16 couleurs en HGR mais cette option 

n T est pas compatible avec 1 ! Apples oft. 
. 2 pages ecran dites HGR et HGR2 . Voir en ce qui concerne 

1 ! organisation de ces pages 1 T article de J.F. Duvivier "Les 

Adresses Du Graphique" dans le No 1 de P0M T S. 

Un point donne de 1 ! ecran ne peut avoir n T importe quelle couleur : les points des 
colormes paires peuvent etre bleus ou rouges et ceux des colonnes impaires peuvent 
etre jaunes ou verts. Le blanc n T est qu T une illusion d ! optique provoquee par des 
doublets (paires de points contigus). 

Voici un prograrane surprise ; 



Vous pourrez, selon les valeurs de C et de X0 obtenir du vert, du bleu, du rouge 
... ou rien du tout. Mais jamais vous n ! obtiendrez du blanc. 

B. La realisation des graphiques HGR 



II existe deux grandes voies pour obtenir des graphiques HGR. 

L T une consiste a utiliser des peri pheri que s specifiques, avec leurs cartes 
interfaces et leurs logiciels: table a digitaliser, crayon lumineux. Nous 
n T aborderons pas cette possibility ici. 

La seconde consiste a ecrire des prograranes graphiques. II existe sur Apple II 
deux series differentes d T instructions graphiques. 

La premiere serie permet d ! obtenir directement sur ecran des traits ou des points; 



3LIST 



10 
20 
30 
40 
50 
60 
70 
80 



rem :coucou~couleurs 
home: 

input "couleur CHOISIE ? (0 A 7) n JC 

INPUT "X INITIAL (0 A 279) " JX0 

HGR t HCOLOR^ C 

FOR X = X0 TO 279 STEP 2 

HPLOT X,80 + 50 * SIN (X / 6) TO X,8Q 

NEXT 
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on utilise dans ce cas les instructions : 

HCOLOR 
HPLOT X, Y 

HPLOT X1,Y1 TO X2,Y2 

La seconde serie utilise une table de "shapes", formes digitalisees et 
prealablement stockees en memoire . Outre les parametres de recherche d'une forme F 
dans une table, on utilise les instructions : 

ROT (rotation, de a 64) 

SCALE (echelle, entiers de 1 a 255) 

DRAW F AT X,Y 

XDRAW F AT X,Y 

HCOLOR 

N.B.: HCOLOR n T a pas d'effet direct sur 1 instruct ion XDRAW qui dessine la forme 
dans la couleur complement aire a celle du fond: noir sur blanc, bleu sur jaune, 
etc. On voit la puissance de cette instruction: redessiner une forme en utilisant 
la meme instruction XDRAW une deuxieme fois revient a effacer la forme sans 
toucher a l^mage de fond. L^ffacement par le noir ... efface tout. 



C. Les programmes graphiques 



Qu T il s'agisse de dessin direct sur 1 'ecran ou de 1 T ut ilisa tion de shapes, les 
instructions utilisent un certain nombre de parametres ( couleur s, coordonnees, 
...). Trois moyens viennent a l'esprit pour fournir au programme ces parametres. 

Le premier consiste a les introduire directement dans le programme : 
HGR 

HPLOT 10,10 TO 260,150 
trace une ligne allant de X=10 et Y=10 (proche de l'angle haut gauche) a X=260 et 
Y=150 (proche de l 1 angle bas droit) 

On tracera courament par cette methode un cadre, des lignes de rappel ... 
La seconde consiste a calculer les parametres par programme. Le programme: 
10 HGR 

20 X0=140 : YO = 96 : R=48 

30 FOR 1=0 TO 6.28 STEP 0.1 

40 HPLOT X0 + R*C0S(I), Y0 + R*SIN(I) 

50 NEXT I 

permet de tracer par points un cercle au centre de l'ecran. 

II existe un troisieme moyen , qui consiste a passer par un artifice pour entrer en 
machine, pendant le deroulement du programme, les divers parametres. On peut pour 
cela utiliser le clavier: il suff it de decider arbit rairement qu'une certaine 
touche represente un certain mouvement, et de "lire" cette touche. On travaillera 
alors a partir d*un point de coordonnees X, Y et on calculera un nouveau point de 
coordonnees X+dX, Y+dY (dX et dY pouvant prendre par exemple , les valeurs - 1 , ou 
1, selon la touche pressee). 

On peut aussi utiliser les poignees (paddles) destinees aux jeux. Et ceci peut se 
faire de deux fagons differentes. 

On peut transformer les valeurs lues sur les deux poignees en coordonnees. Par 
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exemple : 

X = PDL (0) * 279/255 

Y = PDL (1) * 191/255 
Les coord onnees X et Y sont alors introduites dans une instruction telle que 
HPLOT, DRAW ou XDRAW. 



On peut aussi travailler comme avec le clavier en faisant mouvoir un point a 
parti r de sa position actuelle, avec par exemple : 

dX = INT ( PDL(0)/100 ) -1 

dY = INT ( PDL( 1) /100 ) -1 
dX et dY prendront alors les valeurs -1, ou 1. 

Cette derniere methode a ete utilisee pour obtenir la carte ci-dessous. 




D. L 'utilisation des shapes 



Le mode "shape" possede plusieurs vertus. 

* Une shape meme complexe est tracee sur l 1 ecran de fagon apparanment instantanee. 

* Une "table de shapes" permet de disposer sur appel simple, d T un lot de formes 
classiques relativement a un pr obi erne donne ( composants electr oniques , lettres 
. . . ) : ' 

* Les options ROT et SCALE permettent la mise en oeuvre d'effet de mouvement et de 
loupe . 

* L T instruction XDRAW, grace a ses possibilites d T ef f acement, permet de mouvoir 
des shapes, par exemple pour designer un point, simuler un mouvement mecanique, 
etc . 



Le programme ci-apres est destine a faire tourner une forme sur elle-meme en 
fonction de son deplacement. La disquette fournie contient la carte dessinee et 
une shape representant un mobile que l'on peut deplacer sur la carte en utilisant 
les poignees de jeu. 

0e programme de demonstration ne permet que huit sens de deplacemsnt et huit 
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orientations du mobile. II serait facile de generaliser. 



3LIST 



10 
2 



30 



40 



60 

70 

30 



HOME 

C* C Jvt y¥ W W ^tf ^tf ^tf ^if >xf w w w %m %m \^ \^ 

r\ C. I I ™ ™ *n *n *n ™ ™ 

x PROGRAMME COPIC * 
x DEPLACEMENT MOBILE * 

W V W W W W W W W \^ \V w w \V \V \V w 

/R /R ^ /R w A A w ^ ^ ^ ^ A ^ 

HIMEM: 360 J REM PROTECTION 
TABLE DE SHAPES 
D$ - CHR* (4) 
PRINT D*"BLOADMOBILE" t 
HARGEMENT DE LA TABLE 
PE 
HGR 

PRINT Df "BLOADCARTE" ♦ REM 
ARGEMENT DE LA CARTE 

I" 6 17* }vt V W W "4f W W W W W W \V w w \V w w \v t& 

iVi •••• II ^™ »R ^ .*a /R A ^ A A A ™> A A w /ri 

* INITIALISATION * 

M/ "4f W V Mf V V V V V ^¥ V \v w w 
tn /R ^ A ^> A A A A A A w A A ^ ^ ^ fti 



90 
10 



110 

120 
130 

14 
150 
160 
170 



18 
190 
20 
210 
22 
230 



REM C 
DE SHA 



CH 



POKE 232, 160 { POKE 233,140 
ZG m 20 ♦ ZD = 260 JZH » 10JZB = 

150* REM LIMITATION DES DEP 

LACEMENTS 
ZX = 200 JZY = 122t REM COORD 

ONNES POINT DE DEPART 
ZR = 0JZS = 3 

ZN == 2 1 REM SHAPE NO 2 - ROT 
ATION - ECHELLE 3 
GOTO 360 

REM x* LECTURE PADDLE x* 
ZP = PDL (ZP) 

ZP = INT ( SQR (ZP) / 5.5) - 
IX REM DONNE A ZP LES VALEU 
RS -1,0,1 QUAND LA LECTURE D 
U PDL ZP VARIE DE A 255 
RETURN 

REM xx TRACE MOBILE x* 
ROT== Z5 

XDRAW ZN AT Z6,Z7 
ROT= ZR 

XDRAW ZN AT ZX,ZY 



240 
250 
260 
270 

280 

29 

30 
310 
32 
330 
34 



350 
360 



370 
380 
390 
400 
410 

42 

43 



440 
450 

460 



470 
480 

49 

50 



Z6 = ZXJZ7 ■ ZY 
Z5 - ZR 
RETURN 

REM xx BORNES 



COORDONNEES xx 



IF 
IF 
IF 
IF 



ZY 
ZY 
ZX 
ZX 



ZH 

ZB 
ZD 
ZG 



THEN 
THEN 
THEN 
THEN 



ZY 
ZY 
ZX 
ZX 



ZH 
ZB 
ZD 
ZG 



P 



RETURN 

REM xx LECTURE POUSSOIR xx 

IF PEEK ( - 16287) < = 127 
THEN RETURN i REM SI ON A 
APPUYE SUR LE POUSSOIR DU 

DL 0, ALORS Z=I (DRAPEAU) 

> FIN 
Z = li RETURN 

Ft I*** SkiC \MI \A/ W \Lf \MJ \±t *•* \1/ \1/ \MJ \1/ \t# \1/ \1/ *■* KMI KMI \MJ \MJ \MJ 

* PROGRAMME * 

* PRINCIPAL * 

)K ^IC y& )jC 



Z = 

ROT= zr: scale= zs 

GOSUB 230 

REM xx DEPLACEMENT xx 
ZP = 1 GOSUB 150 1 28 = ZP 
ZP » It GOSUB 150 J Z9 » ZP 
ZX * ZX + 2 x Z8JZY = ZY 

Z9J REM DEPLACEMENT DE 



EN 



GOSUB 270 
IF Z8 = 1 AND Z9 « THEN ZR 

= Ot GOTO 47 
ZR - (2 x Z9 + Z8 
32J REM 10 90 ET 
T LES VALEURS 0,8, 16, ..,56 A 

ZR SELON LE SENS DU D EFFACE 
MENT 

GOSUB 20 

GOSUB 330 

IF Z » THEN 410 

END 



x Z9) x 8 + 
1100 DONNEN 



E. Quelques conseils pour travailler en HGR 



* HGR, contrairement a HGR2, permet d'afficher 4 lignes en bas de l'ecran: 
commenta ires , questions a poser, etc. L'adressage de ces lignes se fait par des 
VTAB a partir de 21, et leur effacement par un HOME classique. 

* Si le programme de traitement est volumineux (plus de 6K), la page ecran HGR est 
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par tiellement occupee par le progranme. II faut alors employer HGR2. 

* Pour eviter que les variables et les tableaux ne detruisent la page haute 
resolution utilisee, il convient de placer un LOMEM juste au-dessus (soit 16385 ou 
24577 selon que l T on utilise HGR ou HGR2 ) . 

* Pour eviter que les variables al phanumeriques ne detruisent les tables de 
shapes, placer un HIMEM ( 36OOO dans notre exemple) . 

* Pour eviter les messages d'erreur quand les coordonnees sont le resultat de 
calculs, limiter par programme les dites coordonnees (de a 279 pour X et de a 
159 ou 191 pour Y). 

* Attention : HGR et HGR2 sont des instructions qui effacent l'ecran. Pour 
conserver une image en vue de la faire reapparaitre , utiliser la technique des 
POKEs (voir POM T S No 1, "Les adresses du graphique" ) . 

* Pour sauver une image sur disque 

. depuls HGR : BSAVE NOM, A$2000 , L$2000 
. depuis HGR2 : BSAVE NOM, A$4000, L$2000 



F. Quelques exemples de graphique haute-r esolut ion 

N.B. En noir et blanc, ces exemples normalement tres colores se trouvent 
devalorises , 

a. Un panneau de controle avec enregistreur a trois voies (extrait d T un cours de 
regulation ) : 

- cadres par 1 1 instruction HPLOT a parametres dans le programme; 

- courbes calculees dans un systeme d Equations dif ferentielles ; 

- aiguilles des indicateurs en shapes. 
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c. Histogramme comment e. Cet histo gramme a ete obtenu a partir du programme STAGE: 
statistiques d'aide a la gestion. Les textes sont obtenus par des POKEs 
directement dans la page graphique haute resolution. 



UfiLEUR MfiXI : 2B 




1 2 3 *4 S b 7 B R 

POPULATION TOTRLE 100 PERSONNES 



d. Structure de l'ordinateur Apple II (extrait d T un audio-visuel MICRO). 

Les textes sont obtenus en employant des sous-programmes de dessins de caracteres . 



i;> i!i r i ii 

IMI.N" jl 

i" i : i r i.. i;: i.i p: i 



flit 



mi:i :•• a irr iiiiiiiii; : 



ni in in in m hi hi m in in in in 

in hi in in in in in in hi in mill.. 

Ill III III III HI III III III Mi ill III III 
III III III III III III HI Hi III III Hi III 
M HHIHIHIimilllllHI 



«• i::i:ir 
i! ti;:i. 



i'i i. : : i:: - 
r :;; 

\>\ i:i - 



;•• i'i i i: 

ii p i<! r. 

!!• H e h • 
ii .';'..v.':; ti;:hi;: 



ii- i-i e i'i • 
ii u t 1 1.. i :;; . 

II i::i:iHr'i:i:;; . 
ii i:i i i.m::kf.; 

Ii- 1:: i.. \-\ m i n: i'! 



SfliS QU55 I F ft I RE DE Lff MUSI QUE 



Les programmes HELLO des disquettes POM T S utilisent egalement des graphiques a 
haute resolution. A cet egard, n T hesitez pas a nous envoyer vos contributions pour 
les prochains numeros : tout est permis, meme l 1 utilisati on du jeu de la vie. 
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Les limites des editeurs de texte sur Apple 



HERVE THIRIEZ 



L T Apple n'a pas ete congu au depart comme materiel de traitement de texte. 
Cependant, de nombreux utilisateurs de 1 T inf ormatique individuelle ne peuvent 
envisager d'acheter un materiel specialise pour la redaction de leurs textes. 
Quelles sont les limitations auxquelles ils sont confrontes en utilisant un Apple, 
et dans quelle mesure peuvent- ils les tourner ? 

1. Limitations de l 1 Apple. 



Dans sa configuration normale, 1 ! Apple II ne possede pas de clavier AZERTY et 
fonctionne sur un ecran en 40 colonnes. De plus, les caracteres minuscules et 
accentues n T apparaissent pas naturellement sur 1 T ecran, et peu d 1 imprimantes 
savent imprimer la totalite des caracteres accentues, quelle que soit la 
gymnastique a laquelle on se prete - mais il s*agit la d*une limitation relative 
aux imprimantes et non au processeur. 

2. Principaux logiciels de traitement de texte. 



II exist e une grande variete de logiciels de traitement de texte sur Apple; citons 
les plus renommes et les mieux diffuses dans la CEE, dans l'ordre alphabetique : 
Apple Pie, Apple Writer (I et II), Easywriter, Magic Window, Superscribe, 
Super-Text, Wordstar (avec carte Z80) , Write-On. Nous nous limiterons dans notre 
analyse comparative a trois de ces systemes. 

3- Criteres devaluation comparative. 



Bien entendu, un certain nombre de fonctions essentielles sont assurees par chacun 
de ces logiciels, avec des commandes di verses et des temps de reponse variables. 
Ces fonctions de base sont : 

. mise a zero de la memoire 

. entree d*un texte 

. sauvegarde sur disquette 

. chargement d T un texte en memoire 

. modification du texte resident (ajouts et/ou suppressions) 
. recherche et remplacement de chaines 
- impression sous formats variables 

Nos criteres generaux devaluation sont les suivants : la qualite de la 
documentation, la facilite d 1 apprentissage, la commodite d f utilisation et le temps 
de reponse. Le premier tableau evalue les systemes retenus pour 1 T analyse selon 
leurs principales fonctions. Le second fournit une appreciation generale selon les 
quatre criteres retenus ci-dessus. 

4. Analyse commentee de trois systemes. 



a) Apple Writer. 

Les avantages particuliers d T Apple Writer sont sa grande commodite d utilisation, 
sa rapidite de f onctionnement et sa facilite de modification. En effet, de 
nombreux articles ont ete consacres dans diverses revues a des "patches" d T Apple 
Writer permettant de le rendre compatible avec telle ou telle carte 80 colonnes, 
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avec 1 T impression de caracteres speciaux, ... L T article de Jean-Louis Meillaud, 
dans le prochain numero de Pom's, montrera d'ailleurs comment creer le ! q t et le 
T u T . Remarquons enfin 1 T existence d T un programme d T apprentissage des commandes 
Apple Writer fourni avec la disquette d'origine. 

Par contre, au titre des inconvenients , citons 1 1 impossibility de voir sur ecran 
comment le texte que 1 T on redige sera mis en page : on est force de tirer un texte 
"a blanc" pour constater la mise en page decoulant des parametres de formattage 
decides au moment du lancement. Autre inconvenient : Apple Writer est lent a 
l f impression. • 

Bug : quand on demande a Apple Writer de justifier un texte en utilisant la 
totalite des 80 colonnes, il deplace le dernier caractere de la ligne en premiere 
colonne : il faut done ne pas justifier de texte en 80 colonnes ! 

b) Easywriter. 

Easywriter a ete ecrit en Forth, un langage tres puissant dont nous parlerons un 
de ces jours. Easywriter permet 1 1 incorporation de marqueurs ignores a 
1 1 impression, afin de pouvoir aisement ef f ectuer des transf erts de blocs de texte. 
Le mode de stockage sur disquette d T Easywriter autorise la memorisation sur un 
systeme en DOS 3-2 de 15% de caracteres en plus par rapport a"ux autres logiciels. 
Une touche speciale fait en outre apparaitre sur 1 T ecran la liste des 
instructions, ce qui facilite grandement 1 T apprentissage des commandes. Easywriter 
etant offert en standard sur le micro IBM, on peut s T attend re rapidement a des 
versions ameliorees . 

L T inconvenient majeur d T Easywriter reside dans 1 1 impossibility dans laquelle se 
trouve 1 'utilisateur , si competent soit-il ( Jean-Frangois Duvivier a declare 
forfait), de penetrer dans le code afin d'eff ectuer des modifications. 

Bug : dans la version dont nous disposons, en cas de manipulation de plusieurs 
disquettes, Easywriter reecrit le catalogue au moment de la sauvegarde, sans le 
relire prealablement . Si l T on a change de disquette depuis le dernier chargement, 
le catalogue de l'ancienne disquette ecrase celui de la nouvelle, et le fichier 
s'inscrit dans une zone qui etait libre sur l T ancienne disquette ! 

c) Magic Window. 

A notre avis, de tous les systemes disponibles sur le marche actuellement , Magic 
Window possede le meilleur rapport performance /prix. La grande originalite de ce 
progiciel tient a la particularity suivante : au lieu d T avoir un curseur mobile se 
deplagant ligne par ligne sur l f ecran, le systeme fourni t sur 1 T ecran une fenetre 
se promenant dans les quatre directions a l T interieur de la page formattee pour 
1 1 impression. L 1 utilisateur visualise ainsi par morceaux (choisis) la page telle 
qu f elle sortira sur 1 1 imprimante . Les differents menus sont tres faciles a 
utiliser . 

L 1 inconvenient majeur de Magic Window tient a 1 1 impossibility de remplacer dans un 
texte une chaine par une autre : il faut se positionner par une fonction de 
recherche a l T endroit vise, puis modifier a la main la chaine. Nous attendons avec 
impatience la prochaine version, dans laquelle ce probleme doit etre resolu. S f il 
est tres facile de reduire la largeur de la page en cours de creation de texte, il 
est par contre mal commode de l T augmenter; il faut done prevoir de creer et 
sauvegarder un texte en 80 colonnes, et le reduire au moment de 1 1 impression , si 
l T on desire eventuellement l T utiliser dans divers formats. 

d) Autres systemes. 

Nous avons commente de fagon detaillee ces trois logiciels que nous connaissons 
bien, mais nous pouvons aussi vous faire part de nos impressions sur d ! autres 
systemes . 
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Wordstar* - A tout seigneur, tout honneur ! Ce systeme est le plus repandu 
mondialement , du fait de son appartenance a la programmatheque CPM. II est done 
disponible sur tous les systemes micro-inf ormatiques equipes d T une carte Z80 
(Softcard) et d ! une carte 80 colonnes. Wordstar comporte une grande variete de 
command es, qui ont inspire les concepteurs de la plupart des autres systemes. 

Superscribe presente son texte en hautre resolution, ce qui permet d'afficher 70 
caracteres par ligne. II est alors possible d f avoir une vue generale du texte. A 
noter que 1 T utilisation de la haute resolution ne porte pas atteinte a la rapidite 
de fonctionnement . 

Katexte est l T un des rares traitements de texte ecrits en Pascal, et profite 
done de la puissance de l T editeur de ce langage. Notons aussi qu T il s'agit la de 
la realisation d f une SSCI frangaise, la societe Ka. 

5.Comparaison des commandes . 



Mode devaluation : 

++ : excellent 

+ : bon 

: moyen 

D : disponible 



imous n avons i aii apparaiure aans j_e 


uaDJ_ea.u ci-aessous que 


j_es criueres ; 


lesquels les trois systemes differaient. 






Apple Writer 


Easywriter 


Magic Window 


Disquette protegee Non 


Oui 


Oui 


Zone memoire disponible 31 K 


11 K 


32 K 


Suppression de mot D 






Suppression de paragraphe D 






Capacite de stockage + 


++ 


+ 


Menu des commandes 


D 




Rapidite de la frappe ++ 


+ 


++ 


Rapidite des commandes ++ 





++ 


Tabulation 




D 


Justification au centre D 




D 


Sauvegarde partielle D 




D 


Sortie en fichier texte 




D 


Chargement partiel 




D 


6. Comparaison globale selon des criteres 


genera ux . 




Apple Writer 


Easywriter 


Magic Window 


Qua-lite de la documentation + 


++ 


++ 


Facilite d 1 apprentissage ++ 


+ 


++ 


Commodite d f utilisation + 


+ 


++ 


Temps de reponse ++ 




++ 


7. Conclusion. 







Initialement , seul Magic Window etait congu pour travailler avec une carte 80 
colonnes. Les versions recentes d T Apple Writer et Easywriter f onctionnent aussi 
avec des cartes 80 colonnes specif iques. Des systemes a base de clavier AZERTY 
voient le jour actuellement . Nous avons utilise pour la redaction du numero 2 le 
systeme IEF avec Apple et Olympia, cette derniere pouvant servir d T entree 
(facultative) ou de sortie. Le systeme de traitement de texte de 1 T Apple ///, un 
Apple Writer tres ameliore, fera l T objet d T une analyse dans le prochain numero. 



Pom's n° 2 



29 



Un exemple de hard copy 



CHRISTIAN GUERIN 



Les imprimantes sont grosso mo do de trois types principaux, selon leurs capacites 
graphiques. Certaines ne peuvent imprimer que des caracteres normaux; c'etait le 
cas le plus frequent jusqu'a ces derniers mois. D T autres, telles que l f Epson Type 
I ou la serie OKI, sont capables d f imprimer des caracteres semi-graphiques , que 
nous decrivons dans le paragraphe suivant. Les dernieres, enfin, impriment des 
graphiques a haute resolution; c T est le cas de la Centronics 739, des Epson Type 
II, 82 et 100, de la Paper Tiger, de la Seikosha et de la Silentype (entre 
autres ) . 

Les caracteres semi-graphiques sont divises en six cases, 3 en hauteur et 2 en 
largeur, dont chacune peut etre noire ou blanche. II y a done 64 caracteres 
semi-graphiques possibles. L T association de ces caracteres permet de reconstituer 
une image. 

Le programme que nous presentons ici permet d'effectuer une "hard copy" d f une des 
deux pages haute resolution de l f Apple sur une imprimante semi-graphique du type 
OKI Microline 80. 

Vous pouvez utiliser ce programme en mode direct, ou a partir d f un autre programme 
en procedant de la maniere suivante : 

POKE 771,32 - edition de la page 1 
ou POKE 771,64 - edition de la page 2 

POKE 772,0 - mode normal 
ou POKE 772,255 - mode inverse 

CALL 768 

Ce programme est ecrit pour fonctionner avec un type de carte interface specif ique 
implantee dans le slot 1 . 

Si la commande de votre carte est differente, ou si vous ne l T avez pas mise dans 
le slot 1, il suffit de modifier le sous-programme OUT en $3C0. 

Si le programme fohctionne, mais que votre imprimante ne saute pas de ligne, 
modifiez-le de la maniere suivante : 

CALL -151 

3AA : A9 OA 20 CO 03 

retour a Applesoft et sauvegarde 

Imprimante Epson 



Afin d T adapter ce programme au cas de l'Espon, il faut ajouter $20 aux caracteres 
graphiques et modifier les ordres de formattage de 1 T imprimante : 

. mode condense 

« mode interligne serre 

. retour en fin de programme 
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Note de la redaction 



Ne disposant pas d'une OKI, nous n'avons pu tester ce programme. Par centre nous 
avons pu admirer I'exemple de copie d'ecran realise par Christian Guerin sur la 
page graphique du jeu Snoggle. 



3 CALL -151 



*30 0*3CD 



0300- 
03 OS- 
OS 1 0- 
03.18- 
0320- 
0328™ 
0330- 
0338- 
03 -lO- 
OS -^8- 
0350- 
0358- 
0360- 
0368- 
0370- 
0378- 
0380- 
0388 - 
0390- 
0398- 
03A0- 
03A8-- 
03B0- 
03B8- 
03C0- 
03C8- 



4C 05 
A9 38 
CO 03 
BF 85 
A2 03 
71 03 
A9 01 
AS FF 
28 DO 
CO 03 
68 A8 
FE DO 
CO 28 
3 A9 
03 A5 
4A 4A 
07 OA 
07 OA 
0D 03 
FD 18 
A9 20 
CO 03 
AO OA 
6 43 
48 AD 
68 8D 



03 20 

2 B9 
AO 01 
FE A5 
20 71 
E6 FE 
85 FD 
4A 4A 
2 29 
AS FE 
68 85 
CO 63 
DO B3 
IE 20 
FE 48 
05 06 
OA OA 
66 06 

03 85 
F0 01 
20 CO 
EA EA 
20 AO 
A 9 IB 

90 CO 

91 CO 



20 
03 A9 

84 FD 
FD 48 
3 C6 
6 FD 
C8 CA 
4D 04 
03 09 
C9 01 
FD C6 
68 20 
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Le Pascal - Analyse du directory 



MICHEL CRIMONT 



Les manuels PASCAL fournis avec 1 ! Apple donnent peu de renseignements sur le 
repertoire du disque, sa situation et sa composition. Or, le but du programme qui 
va suivre est d T assembler sur un seul disque les repertoires de tous les disques 
que l ? on possede af in de realiser un catalogue general permettant des recherches, 
des selections en fonction du nom des disques, du type ou du genre des programmes, 
etc . 

Pour que ce report se f asse automatiquement , il est tout d T abord necessaire de 
savoir lire ce repertoire. II commence au bloc 2 de chaque disquette et peut etre 
defini comme un enregistrement . 

REPERTOIRE: record 

VOL : DISQUE; 

CATALOG : array ! 1 . .77! of FICHIER 
end ; 

II comporte en effet une premiere partie, que je nomme VOL, contenant les 
renseignements relatifs au disque (nom, date de creation,...) et une seconde 
appelee CATALOG se presentant comme un TABLEAU de 77 enregistrements contenant 
chacun des renseignements relatifs a un fichier du disque. On retrouve la 
limitation a 77 du nombre maximum de fichiers par disque que l f on declarera comme 
une constante MAXFILE=77- 

Le type DISQUE comporte: 

le numero du bloc de debut du repertoire, de type entier 

le numero du bloc de fin de repertoire, de type entier 

le nom du disque de type String!?! 

le nombre de blocs du disque, de type entier 

la date de creation du disque, de type date 

et quelques valeurs appelees plus loin V1,V2,V3,V4 et que je n f ai pas identifiees, 
mais que 1 T on peut . considerer de type entier. 

Le type String! 7! est une chaine de caracteres que l f on peut considerer comme 
PACKED ARRAY !0.. 7! of CHAR, 1 T octet contenant la longueur de la chaine (d T ou la 
limitation a 255 caracteres au maximum de ce type), et les octets suivant les 
caracter es eux-memes . 

Le type DATE est defini lui-meme comme un enregistrement. 

DATE =packed record 
MOIS :1..12; 
JOUR : 1 ..31 ; 
AN : 1 . . 99 
end ; 

On obtient done : 
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DISQUE =record 



DEBREP 
FINREP 
V1 

NOMDISQUE 
NBRBLOC 
NBRFICHE 
V2 

DATEDISQUE 
V3,V4 



INTEGER 
INTEGER 
INTEGER 



INTEGER 



INTEGER 
INTEGER 
INTEGER 
DATE; 



STRING! 7! ; 



end ; 



Chaque element de CATALOG se definit par un enregistrement comportant: 

le numero du bloc de debut de fichier, de type entier 

le numero du bloc suivant la fin de fichier, de type entier 

le type de fichier, de type 0..7 

le nom du fichier, de type STRING! 15! 

le nombre de bytes restant dans le dernier bloc, de type entier 
la date du fichier de type date. 

Le type de fichier est represents par un chiffre de a 7: 0=RIEN, 1 =BAD, 2=C0DE, 
3=TEXT, 4=INF0, 5=DATA , 6=GRAPH , 7=PH0T0. Les types 4,6 et 7 ne sont pas utilises. 

On obtient alors: 

FICHIER =record 



DEBFICHIER : INTEGER; 
FINFICHIER : INTEGER; 
TYPEFICHIER:0. .7; 
NOMFICHIER : STRING! 15! ; 
DERNBLOC : INTEGER; 
DATEFICHIER : DATE 



II reste a definir le volume du disque qui doit etre lu, que l T on appelera 
NUMLECTEUR. La procedure de lecture des blocs du repertoire sera done simplement: 
UNITREAD( NUMLECTEUR , REPERTOIRE , 2048 , 2 ) . 

A rioter que l ? on peut remplacer 2048, qui represente le nombre d T octets transferees 
par l T appel de la fonction SIZE0F( REPERTOIRE) qui renvoit le nombre d f octets du 
type repertoire. De meme, un repertoire modifie (par exemple la date de mise a 
jour d T un fichier) doit etre replace sur le disque par UNITWRITE( NUM 
LECTEUR , REPERTOIRE , 2048 , 2 ) . 

La lecture et l T ecriture se feront par precaution sous forme de fonctions 
renvoyant un booleen vrai seulement si la lecture ou l'ecriture s T est effectuee 
correctement . Ce booleen servira de test au programme; ce sont les fonctions 
LIREREP et ECRIREP. 

II peut etre interessant, si plusieurs programmes doivent acceder au repertoire, 
de constituer une UNIT placee en librairie a partir des declarations de type DATE, 
DISQUE, FICHIER, de la variable NUMFICHIER et des deux fonctions LIREREP et 
ECRIREP. 

t.p nrosrramme tel nn f i 1 e.st nrevu presente quelques procedures dont l f utilite n T est 



end ; 
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pas evidente pour 1 ! instant, mais qui sont utilisees par la suite du programme; il 
s T agit de : 

PRINFO : evite d T avoir a se souvenir du code ASCII des caracteres de controle 
HOME : efface la fin de la ligne 

EFB : efface le bas de l T ecran a partir du curseur 
BS : recule de un caractere 

CR : retour de chariot 

SON : declenche un clic 
INV : inverse les caracteres a l f ecran 
(ne fonctionne qu T en PASCAL 1.1) 
NORM : retour a l T affichage normal 

PRENRETURN : ne prend que la touche "return" du clavier 
PRENCAR: renvoie un caractere choisi dans un set donne 
OUI : renvoie vrai si l ! on tape "0". 

La procedure LISTEFICHIER est surtout destinee a controler que cette premiere 
partie fonctionne normalement. Quant au corps de programme actuel , il ne fait que 
realiser la seule fonction "L" du FILER. 

Bien entendu, il serait possible de lister toutes les autres informations du 
repertoire ou par exemple ne lister que les fichiers .CODE en menu et par un 
SETCHAINE chainer directement le programme que 1 f on veut executer a partir du 
programme menu mis dans un systeme STARTUP, ou encore mettre a jour par programme 
des dates de fichiers, etc. Mais le but de cette premiere partie est simplement de 
montrer comment est constitue le repertoire de disque PASCAL. La deuxieme partie 
montrera comment l T utiliser pour realiser un catalogue general. 

II faut bien sur utiliser les modifications du repertoire avec sagesse; on peut 
sans inconvenient modifier par exemple dans d T autres programmes le nom du disque, 
a condition de bien controler la longueur de la chaine de caracteres (STRING! 7!) 
ou le nom d'un fichier ( STRING ! 1 5 !) ; les dates peuvent egalement etre modifiees. 
Bien sur, il ne peut etre question de changer les references aux blocs debut et 
fin de fichier, etc, sinon le disque deviendrait totalement illisible. On peut par 
contre creer des fichiers "fantomes" comme le fait la fonction "M" du FILER, ou 
remettre en service par ce moyen un fichier efface par erreur si l T on connait 
exactement le numero des blocs de debut et de fin. 
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(♦ sssss premiere PARTIE D* UN PROGRAMME DE CATALOGUE GENERAL *) 



<**C (C) M. CRIMONT LE 28/10/61 *) 
program LECREP; 

const MAXFILE =77; 

type CHOI DEC A =set of CHAR; 

DATE =packed record 

MOIS :1..12; 
JOUR :l.. 31; 
AN si.. 99 
end; 

DISQUE =record 

DEBREP 
FINREP 
VI 

NOMDISGUE 
NBRBLOC 
NBRFICHE 
V2 

DATEDISQUE 
V3, V4 
end ; 

FICHIER = record 

DEBFICHIER : INTEGER; 
FINFICHIER : INTEGER* 
TYPEFICHIER:0. .7; 
NOMFICHIER "STRING ! 15 ! ; 
DERNBLOC : INTEGER; 
DATEF I CH I ER 5 DATE 
end; 

var REPERTOIRE! record 

VOL 

CATALOG 
end; 

NUMLECTEUR: INTEGER; 
HOME, BS, EFL, EFB, SON, INV, NORM, CRsCHAR; 



function LI REREP <NUM" INTEGER) s BOOLEAN; (* LECTURE DU REPERTOIRE *) 

begin 
<**I-*> 

UNITREAD(NUM, REPERTOIRE, SIZEOF (REPERTOIRE) , 2) ; 
L I RE REP : = I ORESULT=0 
<**I+*) 
end ; 



: INTEGER; 
: INTEGER; 
s INTEGER; 
: STRING! 7! ; 
s INTEGER; 
: INTEGER; 
: INTEGER; 
:DATE; 
: INTEGER 



: DISQUE; 

•array! 1. .MAXFILE! of FICHIER 
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function ECR I REP (NUMs INTEGER) ! BOOLEAN; (* ECRITURE DONS LE REPERTOIRE * 

begin 
(**I-*) 

UNITWRITE (NUM, REPERTOIRE, SI2EOF (REPERTOIRE) , 2) ; 
ECR I RE P : - 1 ORESULT=0 
(**I+*) 
end ; 



procedure PRINFO; 
begin 

HQME:=CHR(12) ; EFL:=CHR<29) ; 

SON :=CHR(7); INV:=CHR ( 18) ; 

end; 



(* CARACTERES DE CONTROLE *) 

BS:=CHR(8); CR :=CHR(13); 

NORM : =CHR < 20) ; EFB : =CHR < 1 1 ) 



procedure PRENRETURN; (* PREND UNIQUEMENT LE <RET> *) 

var SORT sCHAR; 

begin 

repeat 

READ (KEYBOARD, SORT) 

until EOLN( KEYBOARD) 
end ; 



function PRENCAR(BONSETsCHQIDECA) sCHAR; (* SELECTION D ' UN CARACTERE *) 

var CH sCHAR; 

BON : BOOLEAN; 
begin 
repeat 

READ (KEYBOARD, CH) ; 

if EOLN then CH:=CR; 

BON:«CH in BONSET; 

if not BON then WRITE (SON) 

else if CH in !' ' . . ' M ! then WRITE(CH) 
until BON; 
PRENCAR:=CH 
end ; 



f unct i on OUI : BOOLEAN ; 
begin 

OUI :=PRENCAR ( ! ' 0' , » N' ! ) in ! ' 0' ! 
end ; 



(* VRAIE SI L'ON TAPE ' 0' *) 



procedure LISTEFICHIER; (* ESSAI DES PROCEDURES *) 

var I,N : INTEGER; 

begin 
N: = l ; 

WRITE (HOME) ; 

with REPERTOIRE do 

begin 

WRITELN (' 7 8 10, 'DISQUE: 7 , VOL. NOMDISQUE) ; 
G0T0XY(0,3) ; 

for l:=l to VOL. NBRFICHE do 
begin 

if CATALOG ! I ! . NOMFICHIER <> 7 7 then 

with CATALOG! I! do 

begin 

WRITEC ' :5, NOMFICHIER, * ' :20-LENGTH( NOMFICHIER) ) ; 
with DATEFICHIER do WRITELN( J0UR:2, 7 /' , M0IS:2, ' /" , AN) ; 
N:=N+1 
end ; 

if (N mod 15) =0 then 
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begin 

WRITELN; 

WRITEdNV, * TAPER < RETURN) POUR CONTINUER ' , NORM) ; PRENRETURN; 
GOTOXY<0, 3) ; WRITE (EFB) ; 
Ns = l 
end 

end 
end 
end ; 



begin 
PRINFO; 
repeat 
" WRITE (HOME) ; 
repeat 

SOTOXY < 0,0) "WRITE <' NUMERO DU LECTEURs ' ) ; READLN (NUMLECTEUR) 
until NUMLECTEUR in ! 4, 5, 9. .12!; 
if LI RE REP (NUMLECTEUR) then LISTEFICHIER 

else WRITELN CERREUR EN LECTURE...'); 
GOTOXY (0, 22) ; WRITE < INV, * UN AUTRE DISQUE (0/N) ? ' , NORM) 
until not OUI; 
WRITE (HOME) 
end. 



logma 



Une informatique de geslion adapter aux besoins des (jestionnaires et realises par des gustionnaires, 



ETUDIE • opportunity d'utilisation de l'outil micro-informatique 

• integration entre informatique traditionnelle et personnelle 

• politique de la communication dans l'entreprise 

FORME • formation a Y utilisation de la micro-informatique 

REALISE • realisation de programmes a la demande 

LIVRE • livraison de systemes cles en main, avec des progiciels de 

GESTION DE STOCK, PAYE, COMPTABILITE. 

Nous sommes gestionnaires avant d'etre informaticiens. L' inf ormatique doit s 'adapter a l'homme, et non l'inverse. 
L'outil micro-informatique repond particulierement bien a ce souci de qualite et d'efficacite du travail, 

dans des conditions conviviales. 
Nombreuses references en informatique traditionnelle - divers materiels - et en informatique individuelle - principalement 

Apple - aupres des PME et des groupes industriels. 
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Trois secondes pour trier 



NICOLE BREAUD 



La fonction de tri est sans doute une des taches les plus f ondamentales de l ! outil 
inf ormatique . Mais les utilitaires de tri sont encore rares dans le domaine du 
micro . 

Notre propos dans cet article est de : 

Presenter les differentes methodes de tri et de les classer selon leurs 
performances. 

Proposer un tri par insertion programme en assembleur qui ne vous demande 
que n trois secondes pour trier !" 

A. Les methodes de tri 



Les theoriciens (Knuth, Wirth, Hoare et les autres) nous conseillent d T eviter de 
choisir des methodes. directes ou le nombre d'echanges est redhibitoire et nous 
proposent des methodes basees soit sur une division en partitions du tableau, soit 
sur une structurat ion en arbre binaire des elements. 

Ces methodes elaborees de tri sont en fait des derives des methodes elementaires 
dont on distingue cinq types: 1 insertion, la selection, l f echange, le comptage et 
la fusion. 

De l'idee d T insertion, on retient qu'il s T agit a chaque pas d'inserer un element 
nouveau dans une sous-liste deja triee. C T est la methode de tri elementaire la 
plus efficace et ses performances rivalisent meme dans certains cas avec celle des 
methodes elaborees. 

Selon l T idee de selection, on definit un algorithme de recherche du plus petit 
element qui sera place en debut de tableau, puis du second plus petit element et 
ainsi de suite. Le temps d Execution de cet algorithme est proport ionnel au nombre 
d ! elements, ce qui est inacceptable pour des tableaux assez grands ( plus de 50 
elements). II faut preferer des methodes de constitution d T un arbre binaire ayant 
des proprietes specif iques qui amenent a un tri dont le temps d T execution est 
proportionnel a log2(N), N etant le nombre d T elements a trier. II s T agit du 
HEAPSORT. 

De l'idee d'echange, on a imagine 1 T algorithme de tri a bulles (BUBBLE) qui 
provoque une remontee M en surface" des plus petits elements, mais ceci en un temps 
tres eleve si le tableau est totalement en desordre . II existe cependant un moyen 
plus rapide qui consiste a comparer des elements situes a un ecart donne , et a 
diminuer progressivement cet ecart jusqu T a 1 (comme pour la methode directe). Ces 
methodes ameliorees se denomnent SHELL et SHELL-METZNER. L T idee d T echange a aussi 
engendre la tres belle methode de tri par partitions et echanges denommee 
QUICKSORT. Cet algorithme a un deroulement recursif ; il s ! appelle lui-meme mais 
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avec des arguments de plus en plus simples a traiter. On le programme en BASIC 
grace a une pile de reserve d T adresses de sous-tables a trier qui, avec une 
programmation adequate, demande 20 cases au maximum. 

De l'idee de comptage, on appreciera que cette methode ne modifie pas l f ordre de 
groupes d ! elements identiques. Son efficacite, limitee, suppose done une bonne 
distribution des cles sur un espace bien determine. 

Enfin 1 utilisation de la fusion se revelera souvent bien utile. II est en effet 
simple de reconstruire une liste a partir de sous-listes triees separement. Cela 
permet par exemple de ne trier qu'avec une partie du fichier en memoire vive, dans 
le cas d 'une limitation de capacite. 

CALL-A.P.P.L .E. a publie en Octobre 1980 un article sur les algorithmes de tri , 
ainsi que des tests comparatifs. Les resultats obtenus varient suivant le type et 
la taille des listes triees. Sur un fichier aleatoire de plus de cent elements, le 
classement est le suivant: QUICKSORT, HEAPSORT, SHELL, SHELL-METZNER , INSERTION. 
Une comparaison des methodes de tri vous est aussi offerte dans "la pratique de 
1 T Apple", tome II (editions du P.S.I. ). 

H est a noter que la methode d insertion est la plus efficace de toutes pour les 
tris sur moins de vingt elements et pour des fichiers d T elements pre-tries. Ces 
performances alliees a sa simplicite en font une excellente ressource. La suite de 
cet article vous permettra de l'utiliser cornne sous-programme assembleur de vos 
programmes BASIC. 



B. Le programme TRINS. Tri par insertion 



Si nous disposions du langage LISP (special ement adapte au traitement de listes et 
a la recursi vite ) , nous pourrions tout simplement dire: 

"Trier, c T est inserer le 1 er element dans le tri du reste". 

B1 . Le programme en BASIC 

On insere successivement dans la liste le second element du tableau, puis le 
troisieme, . jusqu T au Ni erne du tableau. Les sous-listes deja triees dans 
lesquelles ces elements doivent s T inserer sont bien sur: 

AO) . 

A(1),A(2) 

etc 

AO ),..., A(N) 

Des que 1 T element a inserer K est plus petit qu T un element de la sous-liste, ce 
dernier est dec ale sur la droit e pour permettre 1 T insertion dans des cases 
anterieures (eventuellement a la 1ere case si 1 T element a inserer est plus petit 
que tous ceux de la sous-liste). S T il s'avere plus grand, il s ! insere a la place 
suivante dans la sous-liste. 

D T ou le programme BASIC: JLIST 



10 



F^l |*** jvj y£ yfc y^ y^ yfc y^ y^ y^ y^ y^ y^ y^ y^ y^ y^ y^ 

* PROGRAMME DE TRI * 

* PAR INSERTION * 

* BASIC * 
y& y& y& )k 



20 



DIM A (255) 
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30 INPUT "N? "?N 

40 FOR I - 1 TO N:A(I) = INT CI 
000 00 * RND (1)): PRINT A(I 
)" "H NEXT It PRINT 

50 INPUT " DEPART DU TRI "JR* 

60 FOR I * 2 TO N 

70 K = A(I) 

8 FOR J = I - 1 TO 1 STEP - 1 
90 IF A<J) < K THEN 130 
10 A<J + 1) a A(J) 
110 NEXT J 

120 A(l) = Ki GOTO 140 
130 A(J + 1) B k 
140 NEXT I 

150 INPUT "OPERATION TERMINEE " *, 
R$ 

160 FOR I * 1 TO Ni PRINT A(I>" 
" t * NEXT I 

B2. Le programme en langage machine 



Gs programme, plutot academique, en langage machine permet le tri d'un tableau ou 
chaque element n'est qu'un seul octet et ou l'on connait l'adresse de debut du 
tableau (contenue dans 6,7) et sa longueur (dans 8). 

*300LL 



0300- 


A0 


01 


LDY 


#*01 


03 02- 


C8 




INY 




03 03- 


Bl 


06 


LDA 


($06) ,Y 


03 05- 


85 


OA 


STA 


*0A 


03 07- 


98 




TYA 




03 08- 


48 




PHA 




03 09- 


38 




S E. C 




03 0A- 


E9 


01 


SBC 


*$01 


030C- 


A8 




TAY 




030D- 


Bl 


06 


LDA 


($06) ,Y 


03 OF- 


C5 


OA 


CMP 


$0A 


0311- 


90 


09 


E'CC 


*031C 


0313- 


E6 


06 


INC 


$06 


0315- 


91 


06 


STA 


(*06) ,Y 


0317- 


C6 


06 


DEC 


$06 


0319- 


88 




DEY 




03 1 A- 


10 


Fl 


BPL 


$030D 


031C- 


A5 


OA 


LDA 


$0A 


03 IE- 


C8 




INY 




031F- 


91 


06 


STA 


($06) ,Y 


0321- 


68 




PLA 




0322- 


A8 




TAY 




0323- 


04 


08 


CPY 


$08 


0325- 


90 


DB 


BCC 


$0302 


0327- 


00 




BRK 





registre d'index Y evolue comme la variable I du programme precedent puis, 
nt la boucle J, Y est empile avant d'etre utilise pour evoluer comme la 
iable J. En fin de boucle J, on recupere la variable I en depilant la valeur de 



Pour tester le programme il faut au prealable charger 6 et 7 de l'adresse basse et 
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de l T adresse haute du premier octet du tableau a trier, et charger 8 du nombre 
d T octets a classer par ordre croissant de valeur comprises entre -128 et +127. 

B3. Rappel preliminaire 

Avant de rentrer au coeur de TRINS, revenons sur 1 f implantation des variables 
reelles en Applesoft et 1 utilisation de sous-progr arimes pour nombres f lottants . 

Chaque valeur reelle occupe cinq octets: un pour l T exposant (avec un decalage de 
128) et quatre pour la mantisse. Dans le cas d T un tableau de nombres reels a une 
dimension, on passe au nombre suivant en incrementant le curseur de cinq unites. 

Pour deplacer les elements de la liste, on utilisera deux sous-programmes: 

- MOVFM : transfer t d'un nombre M vers 1 T accumulateur flottant FAC. 

- MOVMF : trans fert du FAC vers une zone de memo ire M. 

Les arguments de ces sous-programmes sont les adresses basses et hautes dont les 
contenus constituent l T adresse de la premiere case de la zone de cinq octets. Pour 
MOVFM, il faut utiliser les registres A et Y respectivement pour l T adresse basse 
et haute du pointeur. Pour MOVMF, ce sont les registres X et Y. 

Pour comparer deux nombres reels, nous en effectuons la soustraction dans le FAC 
et analysons le signe du resultat en appelant SIGN. Apres l T appel de cette 
routine, 1 f accumulateur A contient 00, 01 ou FF suivant que le FAC est nul, 
positif ou negatif . 

B4. le programme en assembleur 

Les parametres a donner au programme et les adresses ou placer ces valeur s sont: 

- A1 : l T adresse de 1 ! element A(1) du tableau a trier (dans 6,7) 

- N : le nombre d Elements du tableau (dans 10) 

K : l f adresse d 'une variable reelle permettant de conserver la premiere valeur 
de A(I) (dans 8,9). 

Les variables utilisees sont: 

- A I : adresse de 1 T element A (I). 

- AJ : celle de A( J) . 

- I et J : les indices des boucles. 

L'ad-resse de l ! element suivant A(J+1) est calculee et rangee dans X et Y pour etre 
immediatement utilisee par MOVMF. Les sous-programmes SAVE et RESTOR permettent de 
reconstituer le contexte originel, specifie par les valeurs des registres A,X,Y,P 
et S. 
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9 


AI 


EPZ 
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*XIEND 


OF 
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10 


AJ 
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0800 




11 


K 


EPZ 


*08 


0800 
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08 




12 


I 
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08 
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13 


J 
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3 


? A(N) 
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ORG 
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0800 
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15 




OBJ 
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0800 
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0300 




16 
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6 


E EQU !5 


03 


204AFF 


17 


TRI 


JSR 


SAVE 
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7 
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L.DA 


N 
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0307 


18 


20 




CLC 




0308 


6902 


21 




ADC 


#*2 


030A 


8519 


22 




STA 


I 


030C 


A507 


23 




LDA 


Al + 1 


030E 


851F 


24 




STA 


AI+1 


0310 


351C 


25 




STA 


AJ+l 


0312 


A506 


26 




LDA 


Al 


0314 


18 


27 


BCLI 


CLC 




0315 


6905 


28 




ADC 


#E 


0317 


851E 


29 




STA 


AI 


0319 


9002 


30 




BCC 


TAIK 


031B 


E61F 


31 




INC 


AI+1 


03 ID 


A41F 


32 


TAIK 


LDY 


AI+1 


03 IF 


20F9EA 


33 




JSR 


MOVFM 


0322 


A608 


34 




LDX 


K 


0324 


A409 


35 




LDY 


K+l 


0326 


202BEB 


36 




JSR 


MOVMF 


0329 




37 


♦ 

f 






0329 


A519 


38 




LDA 


I 


032B 


18 


39 




CLC 




032C 


650A 


40 




ADC 


N 


032E 


851A 


41 




STA 


J 


0330 


A51F 


42 




LDA 


AI+1 


0332 


851C 


43 




STA 


AJ+l 


0334 


A51E 


44 




LDA 


AI 


0336 


38 


45 


IE' C L J 


SEC 




0337 


E905 


46 




SBC 


*E 


0339 


85 IB 


47 




STA 


A J 


033B 


B002 


48 




BCS 


COMP 


033D 


C61C 


49 




DEC 


AJ+l 


033F 


A41C 


5 


COMP 


LDY 


AJ + l 


0341 


20F9EA 


51 




JSR 


MOVFM 


0344 


A508 


52 




LDA 


K 


0346 


A4 09 


53 




LDY 


K+l 


0348 


20A7E7 


54 




JSR 


FSUE: 


034B 


2082EB 


55 




JSR 


SIGN 


034E 


F002 


56 




BEQ 


KINFAJ 


0350 


102C 


57 




BPL 


AJINFK 


0352 


A51B 


58 
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LDA 


AJ 


0354 


A41C 


59 




LDY 


AJ+l 


0356 


20F9EA 


60 




JSR 


MOVFM 


0359 


A41C 
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LDY 


AJ+l 


035B 


A51B 


62 




LDA 


A J 


035D 


18 


63 








035E 


6905 


64 




ADC 


#5 


0360 


AA 


65 




TAX 




0361 


9001 


66 




BCC 


OK 


0363 


C8 


67 




INY 




0364 


202BEB 


68 


OK 


JSR 


MOVMF 


0367 




69 


♦ 
t 






0367 


A51B 


70 




LDA 


AJ 


0369 


C61A 


71 




DEC 


J 


036B 


D0C9 


72 




BNE 


E» C L J 


036D 


A508 


73 




LDA 


K 


036F 


A409 


74 




LDY 


K+l 


0371 


20F9EA 


75 




JSR 


MOVFM 



0374 


A606 


76 




LDX 


Al 


0376 


A407 


77 




LDY 


Al + 1 


0378 


202BEB 


78 




JSR 


MOVMF 


037B 


4C9303 


79 




JMP 


IS 


037E 


A508 


80 


AJINFK 


LDA 


K 


0330 


A409 


81 




LDY 


K+l 


0332 


20F9EA 


82 




JSR 


MOVFM 


0335 


A41C 


83 




LDY 


AJ+l 


0387 


A51B 


84 




LDA 


AJ 


0389 


18 


85 




CLC 




038A 


6905 


86 




ADC 


#E 


033C 


AA 


87 




TAX 




033D 


9001 
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BCC 


IL 


038F 


C8 


89 




INY 
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202BEB 


90 


IL 


JSR 


MOVMF 
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A51E 


91 


IS 


LDA 


AI 
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E619 
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INC 


I 
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F003 


93 




BEQ 


FIN 
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JMP 


BCLI 
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203FFF 


95 


FIN 


JSR 


RESTOR 


039F 


60 


96 




RTS 




03A0 




97 
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03AO 




98 


MOVMF 


EQU 
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03 AO 




99 


MOVFM 
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03A0 
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FSUB 
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SIGN 


EQU 


$ E & 8 2 


03A0 




102 


SAVE 


EQU 


tfcFF^A 


03A0 




103 


RESTOR 


EQU 


*FF3F 



104 END 



xk*** END OF ASSEMBLY 
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09 
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10 


2C 
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1C 
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F9 
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18 
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C8 


20 
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1A 
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A4 
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93 
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08 
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B5 . Utilisation de la routine 



Le petit programme presente ici donne un exemple de 1 T u til isation de la routine de 
tri ecrite en assembleur par un programme BASIC. 

10 REM )K )K )K )K )K )K )K )K )K )K )K )K )K )K )K )K )K )K )K )K )K )K )K 

* PROGRAMME DE TRI * 

* PAR INSERTION * 

* APPEL SUB-ROUTINE * 

^# ^/ \t/ ^/ ^/ %y >ap ix? ^xr >xf ^xr >xr vv u# ^at 

*o *^ 



20 DIM A (255) 

30 INPUT n N? "JIM J POKE 10,N 

40 K « J X = il = 

50 FOR I « 1 TO NJAd) « INT < 1 

000 * RND (1) ) J PRINT A(I 

>" n j: NEXT i: PRINT 
60 INPUT "DEPART DU TRI "JR* 
70 X « A(l): POKE 6, PEEK < 131 ) t POKE 

7 f PEEK (132) 
80 X =* Ki POKE 8, PEEK (131): POKE 

9, PEEK (132) 
90 GALL 768 

100 INPUT "OPERATION TERMINEE " i 
R* 

110 FOR I = 1 TO NJ PRINT A(I) " 
"} : NEXT I 

Les instructions ** 30, 70 et 80 ** permettent de transferer les arguments a la 
routine, qu'on aura charge e prealablememt (BLOAD TRINS-ASSEMBLEUR ) . Dans les 
adresses 131 et 132, on trouve le pointeur de la derniere variable utilisee par la 
derniere instruction BASIC, done l T adresse de A( 1 ) et celle de K. 



Le programme TRINS-APPEL, qui fait appel a la routine assembleur est vingt fois 
plus rapide que son equivalent TRINS-BASIC (trois secondes au lieu de soixante) 
pour trier une liste d'une centaine d'elements. Pour les plus exigeants, une 
routine^ QUICKSORT donnera de meilleurs resultats pour des tableaux de plus de 
vingt elements. Mais le resultat est deja fort appreciable pour un tri si facile a 
utiliser et peu encombrant. 
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Sprechen Sie DOS ? 



CHRISTIAN GUERIN 



Ce programme va 
linguistiques . 



vous permettre d T adapter les command es du DOS a vos preferences 



Dans le premier numero de POM f S, j T avais presente un programme assembleur qui 
permettait de ne taper que la premiere lettre de certaines instructions donnees. 
Mais cette methode pouvait gener d ! autres "inputs" a l'ecran et devait etre 
utilisee avec precaution. II est a noter qu T elle peut etre exploitee avec profit a 
d'autres fins, par exemple pour eviter des saisies redondantes telles que taper 
"Facture" ou "Compte" en toutes lettres. 

Le programme presente ici s T attaque au coeur du probleme en modifiant la syntaxe 
du DOS a l T interieur meme de celui-ci. La table des noms des ordres que le DOS va 
lire en RAM pour interpreter ce que vous tapez se trouve a l'adresse 43139 ($A884) 
pour un 48 K. Chacune des 28 commandes est separee de la suivante grace au bit de 
poids fort de son dernier caractere . Le programme vous permet de saisir votre 
table personnalisee puis la recopie dans le DOS en fin de traitement. 

Pour constituer votre DOS, tout vous est permis. La seule contrainte exterieure 
est un probleme de place: la table complete ne peut contenir plus de 133 
caracteres. Dans le programme, la longueur de chaque ordre est limitee a 9 et 
bornee par le nombre de caracteres encore disponibles. Nous avons d ! autre part 
interdit les blancs, qui rendraient inutilisable 1 instruction : par exemple si 
vous aviez a taper "CAT LOG" a l'ecran, c T est "CAT" que le DOS irait comparer aux 
valeurs contenues dans la table. A noter que la saisie propose par defaut le nom 
standard des ordres du DOS, qui vous sont rappeles a l f ecran. Cette option permet 
de redonner facilement a votre DOS sa syntaxe virginale. 

Si vous desirez creer une disquette avec un DOS personnalise , il vous suffit 
d 'initialiser celle-ci apres avoir modifie votre syntaxe. Utilisez pour cela la 
commande INIT ou sa version modifiee (par exemple VIVE-POM T S). 



programme est 
1 'adresse 



N.B.: le 

cas modifier 
pour un 1 6K) . 

x x 

* programme: de: * 

x MODIFICATION DES x 
x ordre:s DU DOS x 
x x 

^4f 4 4 V V V V V V W V V V V Mf V V *Jt V V 
,m. A. A ffi. j#L j#L A in A m- fn Jn in m m Jn in JT\ jn A /ft 

20 DIM N$(28): REM NOM FINAL 
30 DIM N0$<28>: REM NOM INITIAL 

40 AB = 43:139 { REM DEBUT TABLE 

50 NC == It REM TAILLE TABLE 

60 MC = 1331 REM TAILLE MAXIMUM 



a adapter si vous ne possedez pas un 
du debut de la table (oter 1 6*4096 



48 K. II faut 
pour un 32 K, 



dans ce 
32*4096 



70 NO = 1 
80 HOME 

90 REM KKXXKKKXKXXKKKKKXXKKX 

* LECTURE DE LA * 

* TABLE DANS LE DOS * 

10 FOR N = 1 TO 28 
110 READ N0*(N) 
120 C = PEEK (AB + NC) 
130 IF C > 128 THEN 150 
140 C* ~ C* + CHR* <C)iNC - NC 
11 GOTO 120 
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150 N*(N) ~ C* + CHR* (C - 128) 
16 C* == "":NC == NC + 1 
170 NEXT N 

180 REM XXXXXXXXXXXXXXXXXXXXX 

x AFFICHAGE DES x 
x NOMS A L'ECRAN x 

Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit 
/ft /ft /ft /ft /ft /ft j^w /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft 

190 TEXT t HOME 
200 FOR I = 1 TO 11 

210 VTAB 3 + I J PRINT NO*(I)J TAB( 
10)JN*(I)} TAB( 19) J"! " 

22 VTAB 3 + It HTAB 22 t PRINT N 
0*<I + H)J TAB ( 32)JN*(I + 
11) 

230 NEXT I 

210 REM xxxxxxxxxxxxxxxxxxxxx 
x MENU x 

\y W W W W W \J/ \J/ \J/ M/ M/ \y W W W W W \J/ M/ \t/ W 
/ft /ft /ft /ft /ft JVl /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft 

250 VTAB 19? PRINT "TAPEZ — > 
POUR UN DEPLACEMENT POSITIF" 

260 PRINT " <--» POUR UN D 

EPLACEMENT NEGATIF" 
27 PRINT " ESC POUR MODI 

FIER UN ORDRE" 
280 PRINT " F POUR LA F 

IN DU PROGRAMME" 
290 INVERSE t FLASH t GOSUB 690 t 
NORMAL 

30 REM xxxxxxxxxxxxxxxxxxxxx 
x ATTENTE D'UN x 
x CARACTERE x 

yK )K )K )K }K )K 

310 C a PEEK ( - 16381) J IF C < 
128 THEN 310 

320 POKE - 16368,0 

330 REM TEST SI ESCAPE 

310 IF C 155 THEN 520 

35 REM TEST SI > 

360 IF C =: 119 THEN GOSUB 690 tN 
O ~ NO + 11 x (NO < > 28) - 
27 x (NO > 11) I GOTO 290 

37 REM TEST SI <— 

380 IF C = 136 THEN GOSUB 690 tN 
O ~ NO - 11 x (NO < > 1) + 
27 x (NO < 15) t GOTO 290 

39 REM TEST SI F 

100 IF C •- 128 < > ASC ("F") THEN 
290 

110 REM xxxxxxxxxxxxxxxxxxxxx 
x FIN DE PROGRAMME x 

5& )K 5& 

120 HOME : VTAB 13 t PRINT " MO 
DIFICATION DE LA TABLE DU DO 
S" 

130 NC = 1 

110 FOR I = 1 TO 28 



150 FOR J ™ 1 TO LEN (N*(D) 
16 POKE AB + NC, ASC ( MID* (N* 

(I) ,J,1) ) 
170 NC = NC + 1 
180 NEXT J 

190 POKE AB + NC - 1, ASC ( RIGHT* 

(N*(I),1)) + 128 
50 NEXT I 
510 HOME t END 

520 REM xxxxxxxxxxxxxxxxxxxxx 
x MODIFICATION x 
x D'UN ORDRE x 

Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit 
/ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft 

530 VTAB 18 t CALL - 958 t PRINT 
t PRINT "MODIFICATION DE L'O 
RDRE "tNO*(NO) 

510 CD ~ MC - NC + LEN (N*(NO))t 
IF CD > 9 THEN CD * 9 

55 PRINT CD J" CARACTERES DISPON 
IBLES" 

560 VTAB 21 t INPUT N* 

57 IF N* =•• "" THEN N* « NO* (NO) 

580 IF LEN (N*) > 9 THEN 520 
59 IF NC -• LEN (N*(NO)) + LEN 

(N$) > MC THEN PRINT ""it GOTO 

520 

600 OK » li FOR I = 1 TO LEN (N* 
)tBL* = MID* (N*,I,l)tOK = 
OK x (BL* < > " ") t NEXT It 
IF OK » o THEN 520 

610 NC « NC - LEN (N*(NO)> + LEN 
(N*) 

620 N*(NO) = N*t GOTO 180 

x TABLE DES ORDRES x 
x ORIGINAUX DU DOS x 
yt\ 5K yK v k 



610 DATA "INIT", "LOAD", "SAVE", "R 

UN" , "CHAIN" , "DELETE" 
650 DATA "LOCK" , "UNLOCK" , "CLOSE" 

, "READ" , "EXEC" , "WRITE" 
660 DATA "POSITION", "OPEN", "APPE 

ND" , "RENAME" , "CATALOG" 
67 DATA "MON","NOMON","PR#","IN 

#:',"MAXFILES","FP" 
680 DATA "INT","BSAVE","BLOAD"," 

BRUN" , "VERIFY" 
690 REM xxxxxxxxxxxxxxxxxxxx 
x POSITIONNEMENT x 
x A L'ECRAN x 

Sit Sit Sit Sit Sit Sit V/ Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit Sit 
/ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft 



70 REM 

710 VTAB 3 + NO - 11 x (NO > 11) 



720 HTAB 10 + 22 x (NO > 11) 
730 PRINT N*(NO)t RETURN 
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Des vers dans la pomme 



ALEXANDRE DUBACK 



REPAREZ VOTRE RENUMBER, SI CE N'EST DEJA FAIT 

Dans la rubrique "L T Apple Epluche" de 1 T Ordinateur IncUviduel, il y a longtemps, 
le probleme du Renumber Apple a deja ete souleve. Nous le rappellons et apportons 
ici une reponse plus complete au probleme. 

Essayez de faire renumeroter par le RENUMBER de votre disquette Master le 
programme suivant : 2 A =2 0*20 

Si .le resultat que vous obtenez est : 10 A-20*10 

il faut que vous fassiez le changement suivant : 

LOAD RENUMBER 

A=x:B= 172: POKE x,B:P0KE x+1,B-T 
UNLOCK RENUMBER 
SAVE RENUMBER 
LOCK RENUMBER 

avec les valeurs de x suivantes : x= 14342 pour le DOS 3.2 avec Applesoft en RAM et 
x = 4815 avec Applesoft en ROM. Pour le DOS 3-3 : x=14316 avec 1 T Applesoft en RAM et 
x=4789 avec Applesoft en ROM. 



LES DRAMES DE L T APPEND - SUITE ET FIN (?) 

Nous avons indique dans le numero 1 de Pom T s une methode pour s T assurer que 
1 T APPEND fasse apparaitre une fin de fichier meme dans le cas ou la fin de fichier 
tombe sur une fin de secteur . Quand ce probleme survenait, on s T en apercevait 
rapid ement car la suite du fichier s'inscrivait au tout debut du fichier. 

Un autre "bug" de 1 T APPEND est nettement plus vicieux, car moins apparent. II 
survient quand vous utilisez APPEND avec des fichiers de plus de 128 secteurs. 

Lors d T un APPEND, le DOS commence normalement a ecrire la suite des informations a 
partir du EOF (end of file) en ecrasant celui-ci par la premiere nouvelle 
information. Quand 1 T E0F se trouve a plus de 128 secteurs au-dela du debut de 
fichier, 1 T APPEND realise l T adjonction des nouvelles informations a partir du byte 
suivant 1 T E0F, et done sans ecraser celui-ci. 

A partir de ce moment, chaque APPEND ulterieur ecrit les nouvelles informations en 
debutant au byte suivant ce premier EOF. Cela ressemble a ce que faisait 1 T APPEND 
avec le bug decrit dans le premier numero de Pom T s, mais c T est plus difficile a 
deceler, car il y a au moins 128 bons secteurs dans le fichier ! 

Nous essaierons de vous donner la solution dans le numero 3 de P0M T s. En 
attendant, ne faites pas d T APPEND sur des fichiers de plus de 128 secteurs ... 
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Des livres pour votre Apple II 

. — ■■ - — 




M La decouverte 
I de V APPLESOFT 

§ par Dominique Schraen 
j et Frederic Levy 

j Cet ouvrage d'initiation s'adresse 
| aussi bien aux futurs utilisateurs 
| d'Apple voulant apprendre la 
; programmation en Basic Applesoft, 
qu'a I'Applelophile chevronne, 
sollicite par ses proches curieux 
de "voir un peu comment ca 
marche". D'approche progressive, 
il est illustre de nombreux 
exemples et exercices. 

Serie verte 

128 Pages - 65 FF 



La pratique de I'APPLE II ► 

(Volume III) 
par Nicole Breaud-Pouliquen 
et Daniel- Jean David 

Ce volume est une initiation a la 
programmation en langage 
machine 6502, dont le jeu 
d'instruction est explique et 
utilise. L'assembleur symbolique 
et ses logiciels connexes y sont 
decrits. ^interaction avec le Basic 
et avec le systeme y sont etudies. 

Serie noire 
176 Pages - 75 FF 



La pratique de I'APPLE II ► 

(Volume I) 

par Nicole Breaud-Pouliquen 

Cet ouvrage presente les 
specificites du Basic Applesoft 
a partir d'une description du 
materiel et du logiciel du systeme 
Apple. Les techniques 
de programmation, de composition 
et d'animation de dessins et 
graphiques colores y sont 
expliquees a I'aide d'exemples 
illustratifs et d'exercices resolus. 

Serie bleue 
128 Pages - 65 FF 







4 Programmer en BASIC 

par Michel Plouin 

Ce livre a ete ecrit pour les 
utilisateurs d'ordinateurs 
individuels en particulier d'Apple II, 
; TRS-80 et PET/CBM. 

Un repertoire Basic rend son 
\ utilisation tres pratique et facilite 
[ la transposition d'un programme 
[ ecrit pour un P.S.I, sur un autre. - 

Serie verte 
I 132 Pages - 65 FF 



Mathematiques^ 
et statistiques 

par Herve Haut 

Cet ouvrage est un recueil de 
logiciels de base (niveau 
superieur) tant en mathematiques 
qu'en statistiques. 
Chaque probleme traite comporte 
une introduction numerique, 
un expose de la technique 
de programmation 
utilisee, un organigramme 
detaille et un programme 
complet en Basic 
suivi d'un exemple 
d'utilisation. 

— - .„ mfiR ^ ^ . Serie rouge 

EDITIONS DU RSX 272 r 



P 4 La pratique de I'APPLE II 

(Volume II) 
j par Nicole Breaud-Pouliquen 

Ce second volume de la Pratique 
i de I'Apple II est consacre au 
1 systeme d'exploitation disque, 

a la gestion des fichiers, 
i a I'impression et aux 
^ imprimantes, a la carte 

horloge Appleclock. 
^ De nombreux exemples 
^ de programmes 
: illustrent les fonctions 
■ et les commandes 
; decrites. 

i Serie rouge 
120 Pages 
65 FF 
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BONDECOMMANDE 
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APP 2 

Envoyer ce bon accompagne de votre reglement a EDITIONS DU RSJ 

41-51, rue Jacquard BP 86 

77400 Lagny s/Marne Tel. (6) 007.59.31 . 
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Les prix sont : taxes, emballage et port compris 
(envoi par avion + 5 FF par ouvrage). 
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Survol de I'Apple III 



BRUNO RIVES 



Que se cache-t-il derriere Apple /// ? 

Le dernier-ne de la firme calif ornienne n T est sorti que tout recemment en Europe. 
II s'agit d T un ordinateur personnel dont les caracteristiques se rapprochent plus 
d T un mini que d f un micro. De memoire centrale 128 K octets extensible a 256 K, 
dote d T un micro-processeur deux f ois plus rapide que celui de l f Apple II, 
possedant un systems d T exploitation tourne vers 1 ! utilisateur final, capable de 
supporter des disques durs de bureau d T une capacite de cinq millions d f octets, 
1 T arrive e de 1 T Apple /// est vraiment un evenement. 

Les caracteristiques du materiel 



L T Apple /// possede en standard une memoire centrale de 128 K. Elle peut etre 
portee a 256 K par 1 T addition de memoires supplementaires et d T un lecteur de 
disquettes integre. Des connecteurs incorpores peuvent relier l T appareil a trois 
autre s lecteurs de disquettes, sans interface supplementaire . 

Le clavier est plus elabore que celui de l f Apple II, comportant notamment une 
partie numerique separee ainsi que deux touches de fonction, quatre de direction, 
toutes etant a repetition automatique. Le clavier peut etre equipe en version 
AZERTY accentuee. L T affichage permet plusieurs modes au choix. En mode texte, on 
obtient 80 colonnes sur 24 lignes en noir et blanc, 40 sur 24 en noir et blanc ou 
en 16 couleurs, l T ecran pouvant etre divise en fenetres. En mode graphique,on 
dispose au choix de 560 points par 192 en noir et blanc, 280 par 192 en noir et 
blanc ou en couleurs limitees, ou 1 40 par 192 en 16 couleurs. 

En standard, nous trouvons egalement une interface RS232C pour connection sur tout 
type d'imprimante serie ou pour une utilisation en communication, une interface 
pour imprimante SILENTYPE, une sortie analogique, une prise video et une sortie 
couleur aux normes americaines ma is facilement transformable pour la France. 

La plaque de base de 1 T Apple /// possede en outre des slots d f entree-sortie (cornne 
sur 1 T Apple II) permettant de connecter quatre peripheriques supplementaires. Des 
cartes d ? interface sont deja developpees sur Apple /// dont une carte parallele 
universelle et la carte Thunderlock qui permet de remedier pour 1 ! instant a 
1 T absence de carte horloge integree. 

La grande nouveaute est incontestablement aussi la sortie quasi simultanee de 
PROFILE, un disque dur de cinq millions d f octets a usage lui aussi individuel. II 
s T agit d f un disque 5 pouces 1/4, technologie Winchester, dont les caracteristiques 
de fiabilite et d T utilisation (absence de bruit, totale compatibilite avec les 
systemes et programmes) le mettent a la portee de quiconque. II est possible de 
connecter jusqu f a quatre PROFILES sur un meme APPLE ///, ce qui porte a 20 mega- 
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octets (plus les possibilites de disquette) la memoire de masse en ligne. 
Le systeme d T exploitation 



SOS (Sophisticated Operations Systems) est le nouveau systeme d T exploitation 
developpe par Apple pour l f Apple ///. Ses caracteristiques justifient son titre: 

* Traitement de fichiers : le systeme d T exploitation de 1 T Apple /// considere 
tout peripherique comme un fichier que 1 ! on peut ouvrir et fermer, dans lequel on 
peut lire et ecrire, que ce soit un fichier sur disque, une imprimante ou un 
modem. Done plus de probleme pour specifier un peripherique ou un autre; ils sont 
tous geres de la meme maniere. On peut creer des catalogues et des sous-catalogues 
de fichiers et done les trier selon les criteres voulus. 

* Gestion de la memoire centrale: 1 T Apple /// possede 128 K ou 256 K de memoire 
vive avec un micro-processeur 8 bits; comment cela est-il ' possible ? Grace a deux 
aspects tres sophistiques du systeme. Le premier est le "Bank Switching" : 
l T espace memoire est decoupe en banques de 32 K et le systeme permet de passer 
d T une banque a 1 T autre de f agon transparente comme sur les minis ou les gros 
systemes . La deuxieme ressource est le "zero page switching" qui permet a chaque 
banque d T avoir sa propre page zero. II ne s T agit plus d'une memoire physique comme 
sur 1 T Apple II mais d T une memoire virtuelle. 

* La gestion des interruptions est integree dans le SOS et se situe a deux 
niveaux: au niveau systeme, les interruptions provenant des peripheriques sont 
facilement recuperables grace a des sous-programmes specialement prevus (nul 
besoin d T ecrire ses propres sous-programmes en langage machine). Au niveau 
utilisateur, il est tres facile de profiter en BASIC ou Pascal de ces possibilites 
par des fonctions de langage comme ONKBD qui est activee des que l ! on touche au 
clavier . 



Le logiciel d T exploitation 



II faut tout d T abord signaler les deux langages qu'Apple a choisi d T implanter sur 
Apple /// : ~ ^ 

- Le Business BASIC est une version amelioree de 1 Applesoft et contient des 
instructions telles que PRINT USING et IF THEN ELSE qui manquaient sur 1 ! Apple II. 
Les possibilites de precision sont ameliorees puisque les nombres peuvent 
attei-ndre 19 chiffres, la longueur des noms de variables peut comprendre 64 
caracteres et toutes les possibilites du SOS sont utilisables au niveau du BASIC. 

- 1 T Apple /// Pascal est une version de l'UCSD Pascal dont nous ne decrirons 
pas les caracteristiques de langage. II permet d T utiliser toutes les possibilites 
du systeme d T exploitation SOS et est le meilleur outil de developpement sur Apple 
///. 

La compatibility entre 1 T Apple II et 1 T Apple /// est totale au niveau du Pascal 
(il suffit de recompiler les programmes). Pour le BASIC, on peut soit utiliser 
1 T Apple /// en mode simulation Apple II, soit faire passer les programmes BASIC 
sur 1 T Apple /// en utilisant un programme de transfert (il faudra bien sur les 
modifier pour les rendre compatibles avec le Business BASIC). 

De nombreux utilitaires sont disponibles, le plus important etant destine a la 
gestion des peripheriques (configuration, copie, operations sur les fichiers...). 
Tous les so us- programmes de gestion des peripheriques sont egalement prevus et 
peuvent etre inclus dans le systeme d T exploitation en fonction du traitement: 
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lecteurs de disquettes, Profile, Silentype, RS232C, Qume, graphique 



Les programmes d ! application 



Apple estime qu T en un an autant de programmes auront ete developpes sur Apple /// 
qu T en six ans sur Apple II. De nombreuses societes de logiciel produisent deja des 
applications sur Apple /// et de nouveaux logiciels apparaissent toutes les 
semaines . Pour l ? instant, Apple propose plusieurs produits: 

* Un traitement de texte, Applewriter ///, qui n ! a rien a envier aux plus 
sophistiques des programmes de ce type, permettant notamment la connection avec 
d'autres fichiers SOS et la possibility d T ecrire des procedures chainees de 
traitement de texte rendant aises le courrier automatique, le calcul de devis, 
e tc . 

* VISICALC ///, qui est la nouvelle version de VISICALC adaptee a 1 ! Apple ///. 
Plus rapide et travaillant en 80 colonnes, il a egalement l ! avantage de pouvoir 
gerer de plus gros mode les. 

* MAIL LIST MANAGER, programme de gestion de fichier individuel et d T impression 
d T e tiquettes . 

* ACCESS ///, programme de communication qui permet de relier 1 T Apple a un autre 
systeme inf ormatique . 

* Un programme de trace graphique, BUSINESS GRAPHICS, qui permet de transcrire 
sous forme de graphiques sophistiques 1 T inf ormation venant de programmes tels que 
VISICALC /// ou d ! autre s programmes d T application . 

En conclusion, Apple /// est en fait destine a un marche different de celui de 
l T Apple II, meme si certains utilisateurs de l T Apple II haut de gamme opterons 
pour ce nouveau produit. Tout le monde n T a pas besoin de 128 K de memoire 
centrale, d ! interfaces de communication ou de disques durs de 5 millions d T octets. 
Par contre, il y a un creneau reserve d T ordinaire aux mini-ordinateurs ou aux 
systemes de time-sharing, et un besoin non encore satisfait par 1 T inf ormatique 
classique auquel Apple /// repond parf aitement . Destine aux Etats-Unis aux 
utilisations personnelles et prof essionnelles telles que le traitement de texte, 
le graphique , la gestion de tableaux ou de fichiers personnels, il devrait etre 
utilise en France non seulement pour ces fonctions, mais aussi pour des 
applications d T inf ormatique classique telles que la comptabilite , la paie , la 
facturation, l T analyse des ventes ... 



Note de la redaction. 



II faut que nous temperions 1 T enthousiasme bien comprehensif de notre ami Bruno 
Rives par quelques commentaires soulignant les problemes eventuels relatifs a 
1' Apple ///. 

Les premiers 10.000 Apple /// distribues aux Etats-Unis ont ef f ectivement eu des 
problemes de fiabilite de circuits et de surchauffe, consequence secondaire de 
1 T ambition de faire coexister tant de possibilites a l T interieur d T un ordinateur 
individuel. II semblerait que ces problemes aient disparu, a la suite de la 
refonte d ! un certain nombre d T elements par Apple, sur un budget additionnel de 5 
millions de dollars. II n T y a pas suffisamment d T utilisateurs en France en ce 
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moment pour que nous puissions en dire plus a ce sujet. Nous attendons d T en avoir 
un sous la main . . . 



Faisons le 
l'Apple /// 



point des remarques negatives que nous avons pu relever a l T egard de 



a) c T est tres bien de pouvoir disposer de 128K, mais il n T en reste en fait que 70 
apres chargement du SOS. Pour disposer de plus de place, il faudra liberer les 
zones memoire occupees par des fonctions du SOS inutiles pour un traitement donne. 

b) en matiere de gestion de fichiers, no tons un catalogue d T apparence beaucoup 
plus prof essionnelle . II semble cependant y avoir un prok>leme quand on reecrit un 
fichier: on court pour l f instant vers des ennuis si' l T o'n reecrit un fichier sans 
1 T avoir annule auparavant, a cause de la presence d T EOFs parasites quand le 
fichier a ete raccourci . Cela fait perdre un des avantages du catalogue dans 
lequel apparaissent la date de creation et la date de derniere modification du 
fichier, car celles-ci sont alors forcement identiques. 

c) 1 T Apple /// ne dispose pas encore de manuels en frangais aussi bien finis que 
ceux de 1 T Apple II. En outre, il manque des utilitaires indispensables tels que 
PLE et DAKIN, pour n f en citer que deux. Par contre ceux-ci fonctionnent toujours 
aussi bien en simulation de l f Apple II. 

d) le clavier numerique separe ameliore significa tivement la rentree de donnees. 
Ce n'aurait pas ete une mauvaise idee d T y incorporer les touches +,-,*,/ et =. 

e) le probleme de 1 T horloge prevue initialement n T a pas ete resolu. L ? arrivee de 
la carte integree est annoncee pour debut 1982 (?) 

f) le passage a 560 points horizontaux dans le nr>de graphique releve d T un tres bon 
sentiment. Pourquoi n ! avoir pas aussi ameliore la definition verticale ? 

g) les lecteurs de disquette supplementaires ne sont pas compatibles avec ceux de 
l T Apple II. En cas de panne, pas de cannibalisation possible avec un Apple II ! 

Malgre ces critiques, les rares utilisateurs que nous connaissons , apres avoir 
souffert des bugs de la version initiale du materiel, sont tout a fait satisf aits 
de l T Apple ///. Les prix publics annonces sont de 23.700 F HT pour l f Apple /// 
(sans moniteur), 23.700 F pour le PROFILE, 2.500 F pour le moniteur et 4.050 F par 
lecteur supplementaire . Ce n T est helas pas donne : avec un second lecteur, le 
moniteur, une imprimante moyenne et une carte parallele, on arrive a un budget de 
36.000-37.000 F HT ! 




□BRAIRIE LA NACELLE 

INF0RMATIQUE • ELECTR0NIQUE • AUT0MATISME • MICR0PR0CESSEUR 

TOUS OUVRAGES ET ABONNEMENTS 
FRANQAIS ET ETRANGERS 

Tous les ouvrages frangais ou etrangers signales dans cette revue peuvent etre obtenus ou commandes a La Nacelle 

2, rue Campagne-Premiere 75014 PARIS - Tel. 322 56 46 

Metro Raspail - Parking a la hauteur du 120 bd du Montparnasse 
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Le jeu de la vie 



JEAN-FRANCOIS DUVIVIER 



Cet article fait suite a ceux consacres a ce jeu dans 1 T Ordinateur individuel dans 
les numeros 27,28 et 29 (mai a aout 1981). On se contentqra ici de rappeler que le 
jeu consiste a faire evoluer une population, generation apres generation. Une 
population est un ensemble de points, situes aux intersections des lignes d T une 
grille carree infinie. Les regies devolution sont imperatives; il n T y a pas de 
marge de manoeuvre et l'avenir de la population initiale est en fait predetermine 
des le depart. A chaque generation, des points meurent , d T autres naissent. Ainsi 
va la vie . . . 

Chaque cellule peut avoir jusqu T a huit voisines immediates. Une cellule nait dans 
une position vide si elle a exactement trois voisines. Elle meurt de neurasthenie 
avec une voisine, et succombe a 1 T etouf f ement si elle en a quatre ou plus. 

Cette serie d T articles a attire ma curiosite et m T a donne l T envie de realiser mon 
propre programme. La f olie des grandeurs aidant, me voici a rever d T un jeu rapide 
(mois de 10 secondes a chaque generation) avec 53760 cellules. Pourquoi ce chiffre 
bizarre ? Parce qu T il correspond exactement au nombre de points affiches en haute 
resolution. 

A ce stade, l f Applesoft ne pouvait satisfaire aucune de mes exigences. Seule 
solution: 1 T assembleur . Un rapide calcul me permit de pouvoir esperer atteindre 
mon but. 

La mise au point a pris quelque temps. En effet je me suis laisse prendre au piege 
de belle maniere. L T affichage haute resolution est fait dans l f ordre inverse des 
bits. Le point le plus a gauche correspond au bit 0, celui le plus a droite au bit 
6. 




Bits 7 6 5 4 3 2 10 



Apres les corrections necessaires, voici le programme pret pour les essais en 
grandeur nature. Les resultats sont a la hauteur de mes esperances: 5 secondes 
pour un ecran pratiquement vide, 9 secondes dans les cas les plus defavorables . 

Vous prendrez, je l ! espere, plaisir a executer ce programme et a reperer les 
populations fixes (aucun changement), stables (figures se repetant a une frequence 
plus ou moins longue), ou vouees a 1 T extinction ! 
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A. Structure du Programme 



1. Routine COMPT (comptage) 
Entree: registre A 
Sortie: registre B 



Fonction: a partir d T un octet transmis dans le registre A, compter le nombre de 
cellules vivantes (c T est a dire le nombre de bits a 1) sur les trois bits de plus 
faible poids. Ce resultat est disponible dans le registre Y. 



2. Routine C.BIT (calcul d T un bit) 

Entree: OCTH (octet haut) 

OCTM (octet milieu) 
OCTB (octet bas) 

Sortie: RESUL (resultat) 

Fonction: calculer l T etat de la cellule de la generation n+1 a partir des 8 
cellules voisines de la generation n. 



Bits 


7 


6 5 4 3 2 


1 





OCTH 




X 


X 


X 


OCTM 




X 




X 


OCTB 




X 


X 


X 



RESUL 



Chacun des trois octets est pris separement et envoye a la routine COMPT afin de 
calculer le nombre de voisins. A noter que le bit 1 de OCTM ne doit pas etre pris 
en compte dans le calcul. 

En fonction du resultat contenu dans le registre Y, 3 cas sont possibles : 

* voisins <^2 ou)>3, la cellule de la generation suivante doit etre vide. RESUL 
est marque d T un bit a (label MORT). 

* voisins = 3, il y a une naissance. Quelle que soit l T etat de la cellule a la 
generation n, la cellule de la generation n+1 est vivante. Un bit a 1 est marque 
dans RESUL (label VIE). 

* voisins = 2, la cellule reste inchangee. On recopie le bit 1 de OCTM dans 
RESUL. 



3. Routine C.BYT (calcul d T un octet) 

entree: OCTH, OCTM, OCTB (octets haut, milieu et bas) 
OCTHS, OCTMS, OCTBS (octets suivants) 

Sortie: RESUL (resultat) 

Fonction: generer un octet resultat, c T est a dire l T etat de sept cellules. Le bit 
7 de chaque octet n T est pas affiche par Apple (information couleur) et ne cons- 
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titue done pas une cellule au niveau de l T ecran. II est force a zero dans RESUL. 

Pour utiliser C.BIT, la routine C.BYT doit presenter la cellule examinee en 
position 1 dans OCTM. D f autre part, le calcul du bit 6 doit prendre en compte pour 
voisins l f etat des bits des octets suivants (attention le bit 7 n ? est pas pris 
en compte). II est done necessaire de travailler sur deux octets qui seront 
decales ensemble vers la gauche avant chaque appel de C.BIT. 



bits r zi ^ 1 
* i 



OCTHS 


1 1 

OCTH 
i 


i 

cellules 
1 

1 . . 

examinees 

1 
I 
1 


OCTMS 


i 

OCTM 
1 


OCTBS 


OCTB 







decalage 



Apres 7 appels de C.BIT, on obtient dans REGUL, sur 7 bits, les 7 cellules de la 
generation suivante. 



4. Routine C.LGN (calcul d T une ligne) 

Entree: LIGN1 (adresse de debut de la ligne superieure) 

LIGN2 (adresse de debut de la ligne examinee) 

LIGN3 (adresse de debut de la ligne inferieure) 

LIGNR (adresse de debut de la ligne res ul tat) 



Sortie: les 280 cellules de la generation n+1 correspondant a la ligne examinee 
sont stockees a partir de 1 T adresse LIGNR. 

Fonction: Generation d f une ligne resultat. Lors des quarante appels de C.BYT 
necessaires a 1 T elaboration d T une ligne, la routine C.LGN doit remettre a jour les 
informations OCTHS, OCTMS et OCTBS. El 16 doit egalement stocker RESUL dans la 
ligne resultat. 



5. Routine C.ECR (calcul d T un ecran) 

Entree: HPAG (numero de la page graphique affichee: $20 pour la page 1, $40 pour 
la page 2) . 

Sortie: stockage des 53760 cellules de la generation n+1. 

Variables: LIGN1, LIGN2, LIGN3, LIGNR, NOLIGN (numero de ligne courante). 

Fonction: calculer pour chacune des 192 lignes, les adresses de debut de la ligne 

courante, de la precedente et de la suivante, puis appeler la routine C.LGN. 

Le calcul est facilite par 1 T utilisation de routines haute resolution de 

l'Applesoft: 

* HPOSN ($F411): donne a partir d ! un numero de page (HPAG) et d T un numero de 
ligne (NOLIGN), l'adresse du debut de cette ligne en memoire (resultat dans LIGN) . 

* INCRY ($F504): donne a partir de la ligne courante, l ! adresse de debut de la 
ligne suivante (resultat dans LIGN). 

* DECRY ($F4D5): donne a partir de la ligne courante, l T adresse de debut de la 
ligne precedente (resultat dans LIGN). 

La routine C.ECR utilise ces troi s routines pour calculer les adresses LIGN1, 
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LIGN2 et LIGN3. L'adresse LIGNR est obtenue a partir de LIGN2 en effectuant une 
translation de page (decalage de $2000). A noter que l f emploi des routines INCRY 
et DECRY permet de faire le tour de l T ecran (la ligne suivant la ligne 192 etant 
la ligne ) . 



6. Debut de programme 

Le programme commence par un affichage de la page resolution No 1 . La boucle 
permet a chaque generation d T afficher la page calculee et de remettre a jour la 
variable HPAG. 



B. Utilisation du programme 



1. Placez-vous en Applesoft. 

2. Chargez en page haute resolution 1 votre population initiale ( ou tout autre 
dessin haute resolution). 

3. Executez le programme VIE.OBJET. 
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Uol" U 




'? ft *7 
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ft o c:* ft 
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Uor U 




**> ft 4 
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C8 
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END 





x*xxx END OF ASSEMBLY 
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Une routine bien pratique 



II est des routines qui vous attirent irresisti blement en raison de leur 
originalite ou de leur ingeniosite. La routine moniteur de S.H. LAM en est une 
illustrati on par f aite . 

La technique utilise e permet a 1 T util isa teur de placer dans une chaine de 
caracteres des commandes a destination du moniteur. La principale utilisation est 
de placer en memoire un court programme en langage machine avec une grande 
facilite et sans un nombre invr aisemblabl e de POKEs ou de READ/DATAs. 



La scene se passe en trois actes: 

1. La chaine est scindee en caracteres qui sont places dans le buffer clavier a la 
suite les uns des autres (a partir de l T adresse $100 ou 512 en decimal). 

2. Le CALL- 144 met en oeuvre les routines qui examinent le buffer clavier et 
s T assurent de 1 T execution des commandes specif iees . 

3. Le retour au BASIC. II est possible, a partir du moniteur, d T incorporer 
plusieurs commandes sur une ligne si on a pris soin d f incorporer un separateur 
(caractere neutre, le "N" par exemple). Aussi lors de l'acte 1 a-t-il ete ajoute 
sub re pti cement la valeur N D9C6G (en Applesoft) a la chaine de caracteres prevue. 
Lors de l T acte 2, cette command e est executee en dernier, apres toutes celles la 
devangant. Les sous-programmes $D9C6 (Applesoft) ou $E88A (Integer) permettent de 
revenir au mode RUN (execution) au debut de la proehaine ligne BASIC a executer. 
Bien que plus lente que des POKEs et des READ/DATAs, cette routine a 1 T avantage 
d ? etre plus simple a utiliser. Succomberez-vous a son charme ? 



10 REM )K)K)K)K)K5K)K)K)K)K)K)K>K)K5K)K5K3K)K)K 

* routine: s ♦ h ♦ lam * 

* POUR APPLESOFT * 

20 REM 



10 Y* « "30 0JFF FF FF FF FF FF" 
110 GOSUB 6390 0: END 
6390 REM 

ROUTINE MONITEUR , 
A3 9 05 REM APPLESOFT DE S.H. LAM 



63910 Y$ « Y* + " N D9C6G" 
63920 FOR I = 1 TO LEN (Y*> 
63930 POKE 511+1, ASC ( MID* C 

Y*tl f i)) + 128 
63940 NEXT I POKE 72,0? CALL - 

144 

63950 RETURN 



1 REM XS«MCSCX»tX3K»t3K)K)K)*C)KlK3*{*3*C]«i(ti*CXitI 

* ROUTINE DE S.H. LAM * 
20 REM * POUR INTEGER K 

\u u/ \U Tjf w \tf W \tf ^ ~w w w 'Jf ur w \±r w w u> w uj- 
/ni JTV Jtt J* Jft JW- n\ fn in Jt\ fli fli VT> A- m rtK A m m- ift m A m- 

30 REM 



50 DIM Y*<255> 

100 Y*""300:FF FF FF FF FF" 

1.10 GOSUB 320 

12 END 

320 REM 



ROUTINE DE S.H. LAM 

POUR INTEGER 



32010 Y*( LEN(Y*>+1>=" N E88AG" 

32 020 FOR 1=1 TO LEN ( Y$ ) 

32 030 POKE 511+1, ASC<Y*(I)> 

320-10 NEXT I 

32050 POKE 72,0? CALL 

32 060 RETURN 
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Les clubs ont la parole 



Apple Club - Avenue Paul Gilson 387 - 1620 Drogendos - Belgique 

Nous sommes heureux de vous faire part de la- creation d T un club d 'utilisateurs de 
1 ! Apple II. 

Les objectifs de ce club sont d'apporter a ses membres une aide tant au niveau 
hardware que software et d T avoir acces a la programmatheque du club. 

Notre club tiendra ses reunions dans les locaux aimablement pretes par P.N.B. 
Computer Center. 

Contact er V. Brunette (02) 376 4244 ou Y. Fischer (02) 356 1817 
Ma Pomme - 6 rue Paul Sauniere - 75016 Paris - France 

Message du president : "Utilisateur d T Apple, je me suis mis a la recherche d T un 
club et me suis fait pieger dans quelque chose qui n ! avait de club que le nom! A 
partir de la, j T ai decide de creer le T chez soi T de tous les utilisateurs d T Apple. 
C'est a ce moment-la que j T ai eu la chance de rencontrer celui qui allait devenir 
notre secretaire ... Nous desirons regrouper tous les utilisateurs d T Apple, de 
quelque horizon qu'ils viennent, pour une association de type T defense du 
consommateur T 

Le club compte actuellement cinquante membres, dans l T hexagone et outre-mer. Leur 
niveau de competence est aussi varie que leur origine geographique , s'etendant du 
novice a 1 ? expert. Les activites de la section parisienne sont essent iellement 
axees autour de reunions bimensuelles consacrees a des sujets particuliers 
(langage LISP, Microdial , ...) ou generaux (documentation, logiciels recents, 
utilitaires, cartes, ...). Notre objectif est simple : etre utiles. 

Le club tient a declarer qu T il respecte la loi concernant la copie des logiciels 
copyrightes et espere avoir une action sur les prix auxquels ils seront proposes. 

Telephoner tous les jours de 20H a 24H au ( 1 ) 558 0578. 



logmo 



Une informalique yestion adaptee aux besoins des gestionn aires et realises par des yestionn aires, 



ETUDIE 

FORME 

REALISE 

LIVRE 



• opportunity d'utilisation de 1'outil micro-inf ormatique 

• integration entre inf ormatique traditionnelle et personnelle 

• politique de la communication dans l'entreprise 



• formation a Y utilisation de la micro-inf ormatique 

• realisation de programmes a la demande 



• livraison de systemes cles en main, avec des progiciels de 
GESTION DE STOCK, PAYE, COMPTABILITE. 



Nous sommes gestionnaires avant d'etre informaticiens. L' inf ormatique doit s' adapter a l'homme, et non 1' inverse. 
L'outil micro-inf ormatique repond particulierement bien a ce souci de qualite et d'efficacite du travail, 

dans des conditions conviviales. 
Nombreuses references en informatique traditionnelle - divers materiels - et en informatique individuelle - principalement 

Apple - aupres des PME et des groupes industriels. 



logmo 



s.a. Centre La Chataigneraie - 29, avenue de Versailles - 78170 La-Celle-St-Cloud - Tel. : (3) 918.13.07 



Revue de presse -JFD 



Depuis quelques mois, de nombreux livres et revues sur Apple ont paru. J T en ai 
selectionne cinq parmi les plus recents. Deux d T entre eux, par leur exceptionnelle 
qualite, me semblent se hisser nettement au-dessus des publications actuelles 
(POM T S excepte) et devoir servir de bible a tous ceux qui souhaitent savoir ce qui 
se passe sous le capot de leur Apple. 

* Beneath Apple DOS. Don Worth et Pieter Lechner. Quality Software ( 1 76p . en 
anglais) . 

Apres tout ce qui a deja ete ecrit sur ce diable de petite machine, il est bien 
difficile de nos jours de se passionner pour un livre. Et pourtant !... Je 
n T hesiterai pas a dire que cette publication a ete l T un des faits majeurs de cette 
annee. II aurait tres bien pu s T appeler "Tout ce que vous avez tou jours voulu 
savoir sur le DOS sans jamais le trouver dans le manuel du DOS". 

Avant d'aller plus loin, je soulignerai que ce livre n T est pas destine aux 
debutants mais s T adresse a des lecteurs ayant deja completement assimile le manuel 
Apple et desirant comprendre 1 T architecture interne du DOS et son utilisation a 
partir de 1 T assembleur . 

Ce livre, tres bien presente sous un format identique a celui des manuels Apple, 
est divise en huit chapitres. 

1 . Une introduction 

2. devolution du DOS et les differences entre chaque version (3,3- 1 ,3-2,3-3) 

3. Le formattage d T une disquette: le pourquoi et le comment. 

4. L T organisation de la disquette reprend un certain nombre d T inf ormations 
provenant du manuel du DOS, mais en les approf ondissant . Ou est place le DOS, le 
catalogue ? Que sont la VTOC et les tables de renvoi pistes/secteurs ? Comment 
sont stockes les fichiers, les programmes en binaire, Applesoft ou Integer ? 
Autant de reponses precises et claires. 

5. La structure du DOS explique comment se passe le "boot" et decrit 1 T utilisation 
de la memoire par le DOS. 

6. L T utilisation du DOS a partir de 1 T assembleur : comment lire un secteur, 
travailler sur un fichier, f aire un catalogue... 

7. Comment singulariser et modifier le DOS (voir l T article de Christian Guerin). 

8. Le schema logique du DOS. Le chapitre examine pas a pas chaque routine du DOS 
et sa fonction. Seul regret, le DOS etant "copyrighte" par Apple, il n T a pu etre 
presente sous forme de listing commente. Cependant, la clarte des explications et 
les differentes indications donnees permettent une comprehension aisee. 

A la suite de ces huit chapitres figurent trois annexes. La premiere fournit le 
listing et les explications de petits programmes en assembleur tres precieux: 
initialisation d T une seule piste, lecture complete d T une piste, etc. La deuxieme 
donne quelques explications tres sommaires sur les methodes de protection 
utilisees pour empecher la copie. La troisieme constitue un glossaire de douze 
pages de tous les termes employes et des pages ou ils sont commentes. 

En conclusion, il s T agit d T un manuel excellent et pratiquement sans defaut que je 
recommande a tous les passionnes de 1 T assembleur . 
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* What T s Where In The Apple. An Atlas To The Apple Computer. Pr. William F. 
Luebbert ( 1 1 0p . en anglais) 

La publication dans un article de MICRO, the 6502 Journal, d T un atlas de 7 pages 
comprenant les principales adresses de 1 T Apple avait deja valu a son auteur une 
certaine consideration. Mais que dire apres une si belle recidive ? 

Scinde en deux parties, cet atlas rassemble plus de deux mille adresses en 
memoire. Page zero, pages graphiques, DOS, Integer, Applesoft, Moniteur: tout est 
passe au crible. 

La premiere partie est organisee par adresses croissantes. Pour chacune sont 
donnes la valeur hexadecimale , la valeur decimale, le label eventuel et une 
explication. Dans le cas de routines, y sont egalement consignes les registres du 
6502 qui sont modifies. La deuxieme partie reprend les memes informations mais par 
ordre alphabetique des labels. 

Seul reproche a formuler, je n T ai pu y trouver 1 T explication de certains sigles 
figurant en face de chaque adresse. J T ai egalement pu trouver (et n T en suis pas 
peu fier) quelques adresses speciales n ! y figurant pas ! 

De presentation dense et concise (parfois trop), cet atlas represente le principal 
outil de travail sur Apple des que l T on veut s T aventurer hors des octets battus. 

* Apple II Monitors Peeled. Apple Computer Inc. (90p. en anglais). 

La premiere version de ce manuel , ecrit par William E. Dougherty, date de Mai 1979 
et etait distribute a ses membres par le club americain A.P.P.L.E. (Apple 
Pugetsound Program Library Exchange). Seduit et convaincu de son utilite, Apple 
Computer Inc. a revise et ameliore son contenu pour en editer un manuel de meme 
format que ceux que nous connaissons. 

Exclusivement dedie aux moniteurs (l T ancien et 1 T Autostart ) , 1 T Apple II Monitors 
Peeled explicite l T usage des differentes variables en page zero et de toutes les 
routines utilisees dans le moniteur. Quelques programmes en Applesoft permettent 
d ! utiliser immediatement les informations acquises. 

Tres interessant pour les lecteurs programmant en assembleur, il peut egalement 
etre recommande pour les debutants qui desirent apprendre comment fonctionne le 
moniteur: grace au style clair et precis et a de nombreuses explications, ils ne 
seront pas trop perdus. A quand la traduction frangaise ? 

* Call- A.P.P.L.E. In Depth NO 1. All About Applesoft (135p. en anglais). 

Edite en hors-serie par le magazine "Call-A.P.P.L.E." , ce numero est entierement 
consacre a 1 T Applesoft. II regroupe de nombreux articles s T interessant tant a la 
structure interne de 1 ! Applesoft (stockage des programmes et de ses variables en 
memoire, utilisation des adresses en page zero...) qu T a son utilisation (overlay, 
rapidite . . . ) . A noter que les nombreux programmes presentes dans la revue peuvent 
vous etre livres sur disquette. 

* Micro Apple 1. Micro, the 6502 Journal (en anglais). 

Ce numero 1 regroupe trente articles publies dans la revue entre 1977 et 1981, et 
comprend une disquette d l accompagnement . D T un interet limite pour le programmeur 
confirme, il peut cependant etre interessant pour des debutants qui y trouveront 
des programmes courts et simples dont ils pourront s T inspirer. 
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Courrier des lecteurs 



J f ai trouve une erreur dans votre 
revue ! Page 42, section 7, il faut 
lire CTRL-J a la place de CTRL-M. Ce 
n'est pas important, mais cela me 
fournit un bon pretexte pour vous 
ecrire . 

Evidemment, je tiens a vous feliciter 
pour la tenue de votre revue, c'est 
bien , continuez, n'hesitez pas a 
ecrire des programmes en assembleur 
Un haut niveau de programmat ion 
est apprecie. 

En ce qui concerne les erreurs dans 
les articles, j T ai apprecie le 
serieux avec lequel elles ont ete 
traquees. Malgre cela, des "vers" 
passent a travers le tamis . . . 

C'est pourquoi je vous supplie, si 
par megarde une M bogue M se produit, 
ne la cachez pas a vos lecteurs et 
faites les corrections necessaires 
dans le numero suivant, en gros sans 
se cacher . 



Le POKE se trouve dans la zone CPM 
I/O. A priori, cela fonctionne sans 
probleme, mais ce qui m'inquiete, 
c'est que Microsoft ne l'ait pas 
prevu. 

P. Bekaert - Le Mesnil St Denis ** 
Quelqu T un sait-il pourquoi ? 



J f ai pris un abonnement, ne 
connaissant pas votre revue ... 
J f espere en tirer partie , mais 
j f avoue bien sincerement que le 
niveau est haut pour mes minimes 
connaissances. Le probleme des 
debutants est bien simple, car 
ceux-ci sont livres a eux-memes sans 
documentation, ou bien avec une 
documentation en anglais, et surtout 
sans conseils ni professeurs. lis 
sont done tenus d f apprendre seuls et 
ce n f est pas facile. 

Que me donnera 1 1 inf ormatique , je 

1 T ignore. m?n !=! P 'pq+- inf^OQQQnt- .To 
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Formattez vos programmes 



3 LIST N T avez-vous jamais eu envie d T agrementer 

vos programmes de petits tableaux comme 
100 REM dans l'exemple presente a gauche ? Si vous 

avez essaye, vous vous etes apergu que cela 
demandait beaucoup de travail car la 
presentation du texte a l T ecran est 
differente de sa physionomie dans un 
listing. 

Le BASIC, Applesoft ou Integer, introduit en effet des espaces supplementaires aux 
caracteres que vous frappez. C T est la raison pour laquelle 1 'utilisation du "Poke 
33,33" est si precieuse pour les corrections. 



M/ M/ \1/ M/ M/ M/ M/ M/ M/ M/ M/ M/ M/ M/ \J/ VI/ Vi/ 

JTI /ft Jt\ Jt\ JTI /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft 

* FGRMATTEZ VOS * 

* PROGRAMMES DE * 

* BELLE MANIERE * 

M/ M/ M/ M/ M/ M/ %|/ M/ %J/ vi/ viz vj/ vt/ vj/ vj/ vj/ vt/ vj/ vt/ 
/ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft /ft 



La solution a tous vos problemes de presentation de programmes reside dans les 
instructions suivantes : 

- Poke 33,28 (en Applesoft) 

- Poke 33,32 (en Integer) 



Apres avoir procede au POKE adequat, vous pouvez entrer au clavier les REM suivant 
le format que vous souhaitez. Quand vous avez termine , utilisez 1 T instruction 
"POKE 33,40" ou la commande TEXT (ou encore appuyez sur Reset si vous avez 
1 T Autostart) pour retablir la f enetre de visualisation normale. Vous pouvez alors 
lister le programme, les REMarques resteront bien en place. 






PROMOTIONS 
SPECIALES 
reservees 
aux lecteurs de 

"POM'S" 



PRIX FT.T.C. 

APPLE II + 16 K 8 500 

APPLE II + 32 K 8 750 

APPLE II + 48 K 8 990 

APPLE III 128K 26 000 

DISK II + CONTROLEUR 4 720 

DISK II 3 375 

DISK III SUPPL 4 400 

DISK 8" 2*256 K 19 150 

DISK 8" 2*512 K 24 100 

DISQUE DUR 10 MGA 41 500 

MODULATEUR N/B KIT 220 

CARTE COULEUR SECAM 1 050 

CARTE COULEUR R.V.B. 920 

INTERFACE// -j 350 

INTERFACE // APPLE III i qoo 

INTERFACE V24. RS 232 1 450 

CARTE INTEGER 1 450 



PRIX 

CARTE APPLESOFT 1 450 

CARTE PASCAL 3 240 

CARTE LANGAGE 1 580 

CARTE MICROSOFT Z80 2 750 

TABLETTE GRAPHIQUE 5 200 

CARTE IEEE 488 ... 3 100 

CARTE PROTOTYPE 1 60 

CARTE PROTO APPLE III 390 

CARTE RECON. PAROLE 1 450 

CARTE MICROMUSIC . ^ 320 

CARTE APPLECLOCK 2 160 

CARTE TIMER CCS 1 150 

CARTE VIDEOTHERM 80C 2 970 

CARTE SMARTEM 80C 2 1 80 

SYLENTYPE II 2 800 

KIT SYLENTYPE II III 270 

EXTENSION 16 K RAM 250 



r 



PROMOTION DU MOIS 



APPLE II 48 K + DISK II avec Controleur + Moniteur Vert 9" + 10 disquettes 

14 400 FT.T.C. 
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Liste detaillee des produits contre erweloppe timbnW Ces prix vous seront consents sur presentation de cette publicite. 

J.C.R. Electronique - 58 rue Notre-Dame-de-Lorette - 75009 Paris - Tel. : (1) 282.19.80 

Expedition dans toute la France - Materiel garanti 1 an pieces et WL-O. - Ouvert du mardi au samedi de10ha13hetde14ha!9h 

En raison des fluctuations monetaires r ces.prix sorrt susceptibles d'etre modifies sans preavts. Nous consuiter pour confirmation. 
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voire micro -informatique! 
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Vous etes industriel, chercheur, enseignant, parti- 
culier, membre de profession liberale. 

Nous sommes une equipe d'ingenieurs ayant une 
position de leader sur le marche de la micro-informa- 
tique et nous avons une experience unique en matiere 
d'installation et maintenance de systemes. 
Nous sommes faits pour nous entendre. 



Micro Informatique Diffusion 



51 bis, AVENUE DE LA REPUBLIQUE, 75011 PARIS. TEL: 357.83.20. 



• Micro-ordinateurs. Apple Commodore Pertec. 

• Peripheriques. 

Disquettes, disques durs, imprimantes, terminaux 
clavier-ecran, tables tragantes, tables a digitaliser. 

• Interfaces. 

Pour terminaux de tous types (V 24 RS 232C, 8 bits 
paralleles). Entrees analogiques. Sorties analogiques. 
IEEE-488. Entrees BCD. Cartes base de temps horloge. 
Calcul rapide. 



Ouvert de 9h a 12h et de 14h a I9h. Sauf le dimanche. 



